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1.0 liUSliflliCIlflil 



The purpose of this document Is to define the ISWL/CI V2.Q 
language to such a degree that the language can be understood and 
used by programmers experienced in the use of high-level 
block-structured languages. 

The ISWL/CI V2.0 language is defined by the ISWL V2.0 
(ISWL/CC) ERS and by this document. 

Other appendices are induced in the document to describe the 
fol lowing? 

- LANGUAGE DISCREPANCIES 

- IPL MACHINE BREAKOUT 

- COMPILATION ERRORS . 

- IPL ISWL REiEkVEO WORDS 

- ASScMBLY LANGUAGE DESCRIPTION 

• COMPILER OUTPUT 

- COMPILING SOURCE MODULES 

• OBJECT PROGkAM EXECUTION 

'■- MACHINE BREAKOUT EXAMPLE 

The reader is urg^d to read the appendices in the order as 
listed above from the top to the bottom. 
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2.0 *££!!£* fll£-M£U!OIS 



The following document is reaulred. 

ISWL V2.0 EkS (Rev. A) 

T^e following document references related material with which 
the reader's fimiliarity is assumed. 

CY-IFP 70/1PL ISWL V2.0 Design Plan 

The fallowing documents reference related material which the 
read r is urged to read before he attempts to execute an IPL ISHL 
obj ect program. 

IPL Instruction Simulator V2 ERS 

Software Fn-ji nee ring User - s Handbook (Rev. K) 

KkOJOS Time-Sharing User's Manual 

1HL Processor-Memory Model Indeoendent GOS (Rev. D) 
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3.0 APP£Nni x - A_r^LM&y ASfc_ilIS£dEPM£UES 



This section describes tne differences and restrictions of the 
I3HL/CI V2.0 Language from the ISWL V2.0 ERS and the "IPL Machine 
8reakout" aefinition (see aopendix entitled, "IPL MACHINE 
BREAKOUT"). 



3.1 LMSiiMLj}i££f££i*££S 



- No I/O of any kind is supported. 

• Any feature requiring runtime support Is not provided. 
This induces support of exponentiation and full runtime 
storage manioul atlon. 

- Input will be the KRONOS Rev. C character set. 

- Compiler usage, limitations, and error list are peculiar 
to the product. 

- Mdcnine oreaKout will be supported to the level defined by 
the proposal of November 15, 197<* by C. W. Schwarcz, 
entitled "IPL Machine BreaKout" (see appendix entitled, 
"IPL Machine Breakout"). 

• The word "main" is an option* I attribute of a procedure 
ana indicates the first procedure of a program to be 
executed when so required by the system. 

• Constant expressions can only De of type integer when used 
in constant declarations. 

• Pointers to procedures aren't implemented. 

- Forward pointer references to adaptable types are not 
al lowe J. 

- The B comment to-iqle must occur syntactically first in the 
program before any non-lSWL text in the source program. 
Syntax scanning is left to right per source statement. 
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- R?al datd type is not supported. 

- Sets with 25b elements are supported. 

- Type identifier lists are supported in type and constant 
a»»cl srat ions. 

- Substrings can be passed as parameters. 

- Begin blocks with local declarations are supported. 

- The pointer tyoe test operator is supported. 

- For statement increment and decrement is supported. 

- The #eof function is not supported. 

3.2 L^GJJflkJL_ifiiiimO»S - 



- No parameter Passing is allowed for code (IPL) 

procedures. 

- Macnine built-in functions with the exception of the 
a^aress function must be evaluatable at compile time. 

- //'JIT type does not malign other fields in a record 
definition. The fields following a field of J3TT type are 
aliened to a byte boundary. 

- #8IT c*nd #3YTE types are conformable only to themselves. 

- //FAST tyoe is ignored and variabJes of this type are 
treated as automatic variables. 

- tf'jF* czr\ only be used in a machine statement. 

- a )F'3 and //0F6IT are not supported for arguments which are 

constants. 

- LOC<KLG i»nJ PROLOG directives 3re lexical. 

- I t :i PROLOG directive is used, then it must be the first 
st jte^ent in The procedure. 

- It .» i'k'OlUG directive is not used? the following 
restrictions opply. 

NCR/C3C PRIVATE 
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3.0 APPlNDIX A - LANGUAGE DISCREPANCIES 
3.2 LANGUAGE RESTRICTIONS 



- The following statements cannot be usedl 

- CASE 

- GOTO EXIT 

- procedure/function cal Is 

- EXIT from procedqr e/functlon 

- RETURN 

- FOR 

- BEGIN 

- NEXT 
" ■ ■- RESET 

. - - CYCLE 

- ALLOCATE 

- VAR declarations for automatic variables 

- No return code is generated for the procedure/function. 
* #Bir type cannot span 6** bits. 

- Locking a "locKed" register and freeing a "free" register 
are i I I egal • 

- In order to initialize types which are either or contain 
#BIT and #QYTE types, the #M function must be used. In 
this case* the left most n=(number of bits representing 
tne tyoe definition) bits in the hex character string are 
used for the initialization. 

- It a variable is locked to a register and is one of the 
following types: 0ADDKESS, #DESCRH, or #0ESCRF t it is 
illegal to access a field of the variable. 

- An * in a value constructor can only be used for 
uninitializing elements of a structured variable and not 
the entire structured variable. 

- Tne fields of a machine data tyoe are not addressable via 
the #L0C function and the unary pointer operator ("*). 

- The <bounds list> of an <al location designator cannot be 
of the form <scalar expressi on>. • . <sca I ar expressions 
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*♦• APPENDIX B.-„yPl 1 , MAQhlNp B^EAKOU^ 



The I' 5 L Machine BreaKout features of the language are defined 
by a memo entitled, "IPL Machine Breakout's written by 
C. W. ichworcj on November 15» 197«*. The contents of the ae»o 
are contained in the appendix. 



*♦•! I p l, Mftghl.ME .PREAKpUT. «« (REVISI ON 3 ) 



SWL machine breakout provides facilities for defining both 
types and variables using machine-deoendent typest facilities 
such as registers, and generating machine instructions through an 
assembly language facility. 

By provi ding we I I- de f ined interfaces oetw»en SWL types and 
statements on the one nand, and machine types and statements 
(instructions) on tne other hand, the amount of machine code can 
be redjeed to the specific functions that the programmer wishes 
to oefire in a machine deoenent manner. Housekeeping! 

input- output, memory management! addressing* and flow of control 
can .11 oe written in SWL itself it the programmer desires. 



<♦.!.! CCJE PVOCCDURl 



A proceiure declared with the CO0E attribute can make use of 
machine jata types ana machine statements. A COOE procedure does 
not automatically contain 1t\^ standard compiler-generated 
prologue and spilojue. The standard prologue and epilogue C3n be 
-.lenerutea through the use of the PROlOG and EPILOG machine 
directives. 

Hniie fht^po jre no restrictions as to the range of SWL 

- sttft'-ments and declarations in a code procedure* the programmer 

mjst ensure thnt the standard prologue or epilogue has been 

exec~.tcd.uno thjt the njcessary standard SWL environment is in 

tict if r.vjuired uy machine-independent SWL declarations or 

■Sta-t-rments. 



jyntdxl add a new procedure attribute. 
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t*.Q APPENDIX B - IPL MACHINE BREAKOUT 
*♦.!.! CODE PROCEDURE 



<oroc_at tribute> !! = <code_attribut e> 
<codtr_attribute> !! = COOE(IPL) 



Note that the code attribute is not part of the procedure 
type. Tnus callers of a procedure need not know whether the 
procedure oeing called is a code procedure or a normal procedure 
(unless* of course* the procedure reauires machine-dependent 
parameters. 



.«*■•! .2" CODE BLOCK 



A code block, is a BEGIN blocK that can contain machine 
dec I arat ions or statements. It can also contain SWL declarations 
or statements* The same restrictions defined for code procedures 
apply to code blocks. 

Syntax! reolace the definition of begin statement. 

<begin_statement> !!= BEGIN t£<code_attr ibute> 33 

<aeclar3ti on_l ist> <stat ement_l ist> END 



Examples 

nothing! BEGIN I CODE(IPL) 3 
TYPE 

trans_j/ector = 

A&RAY CO. .Of f (16) 3 OF #address» 
anqus = Udescrh? 
VAR trans I trans_vector » 
pu I ~ fladdress » 
i I 0. . f f C 16) ; 
FOrf M= TO ending DO 

pu I = * transC 1 3 
FOKEND 
END nothing; 



k*l.3 CODE MODULE 



A code raoaule is a module that contains machine declarations 
potentially incluaing code procedures. 
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^♦.0 ADPFN'ulA 9 - IPL MALHINE BREAKOUT 
«».l.i COilL MODULE 



Syntax: replace module declaration. 

<module_Jec I aration> 11= MODULE C [<code_attribute>3 3 

[ <moaul evident i fier> 3 £ (<orongs>)l 
<declaraticn_l ist > MOOEND 
[ <modul evident if ier> 3 

Example! 

''ODLLE [CJDEdPLH mover; 

PPOC move (VAL from, to! ^ADDRESS) 

VAR geprqe 1 AkkAY C0..103 CF *3YTE(8,o); 
• • • • • 

PtrOCENO move; 
MODEND mover; 



<♦.!.«♦ COJL ATTRIBUTE INHERITANCE 



The code attribute follows normal SHL block structure* Thus 
any .'>0Juie, procedure, or block declared within a code module* 
Droc^aure, or block a I so 'impl ici t ly has the code attribute. 



*4.1.5 MACHINF uATA TYPES 



Machine dit^ types are provided to allow the use" of machine 
dependent data within structured types* variable declaration* and 
most other nice places. 

<maCfMne_tyP5> :t= <byte_type> I <bit_type> I <descr iptor_t ype> I 

<address_t yoe> 

H:cnlne tyoes are available in the form of built-in type 
oec I .-.rat ions. 

'» • 1 . '.> . 1 .Hy_lfi_lYP.fi- 



A byr* tyo^ defines a type that is allocated on a byte (eight 
nt) boundary jivj is an integral nuirber of bytes long. The type 
definition can soecify j more rigorous alignment (2» *4 , or 8 
Dy te- ) . 

<by t"_t vnt> !t= /HYTt ( <by te_l en jth> ( , <by te_i I i gnment > 3 ) 
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<».0 APPENDIX B - IPL MACHINE OREAKOUT 
*♦• 1.5. 1 Byte Type 



<by te_l ength> lt= <integer_expressi on> 
<oyte_alignment> n = II 2 t <§ t 8 



Examples 
TYPE 

one.word = f8YTE(8,8) f "8 bytes. Word aligned." 

oecimal_string = #BYTE(256>, "256 bytes. Byte aligned." 

half_word = #BYT£(n,**), "<♦ bytes. Halfword aligned." 

character = #BYTE(1); "1 byte. Byte aligned." 



<».1.5.2 PIT Tvoe 

A bit type defines a fixed length bit string aligned on a 
boundary. The length of a bit string is a maximum of 6^. 

<bit_type> l.i= #BIT (<bit_Jength>) 

<bit_length> lis <integer_constant> 



bit 



An address type Is a full virtual address. It is defined as a 
record to allow the individual fields of a virtual address to be 
referenced. 

<address_type> 11= 0ADDRESS 



#ADDRESS is equivalent to the following record I 

TYPE 

#AJURESS = 
RECORD 

r ing_num I #BtTC») • 
seg_num t #0IT (12), 
byte_num I #BYTEU) 
RECENO; 
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<*.0 APPFNDIX H- IPL MACHINE BREAKOUT 
'4.1. 5.V Descriptor Type 



<♦.!. '.».<♦ ±2.$£.rl£±£cJlxz2 



Two descriptor types are provided to define the halfword and 
fjllworo bdp descriptors. 

<Jescriotor_type> Xi= tfUESCKH I #DESCRF 



The descriptor types are equivalent to the following record 

types. • 



TYfE - 

tfOEcCRH = 

PACKED RECORD 

format. I tf OH (1>» 
oumtry ' I 0BIT(2) t 
length t 03IT (9) , 
offset I #3YTE(L',2) 
RtCENO 

/'DESCKK = 

PACKED RECORD 

descr t tfDESCRH, 
index x ti BYTE ('♦»*♦) 
RlUEND; 



^.1.0.5 H^sihin£_I^p_eji.In,Exj3rasslQJlS 



The use of these types in SWL statements and exoresslons Is 
limited to ttu» issi jnment » eaua I ity, and inequality operators. 
Arithmetic expressions containing machine types are not allowed* 
Machine tyotr, c=*n be addressed in tne same way that normal SHL 
d-itj types Crin oq a idressed (i.e. used as REF parameters, 
non-tocalty assigned to, etc.) 

An e I <?.tu>p tary machine t/oe (0QIT or #8YTE) is conformable to 
eitn-r -integer- values or the results of the memory built-in 
tuncT ion. 



An element ot type dAUJRESS is ccnformaole to a direct pointer 

vjI j. • 

A=> clement of type tfADOrttSS, #0ESCRH, or fDESCSF can be 
conforoidblo with an aggregate (value constructor) containing 

NCR/CJC PRIVATE 
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k.O APPENDIX d - IPL MACHINE BREAKOUT 
*«.1.5.5 Machine Types In Expressions 



values to set the »BIT and #8YTE type fields. 

^.l.fc MACHINE STORAGL CLASHES 

<machine_storage_class> «» = »FAST I <reg_class> ( <<reg_number>n 

<reg_class> 11= #XkEG I #AR£G 

<reg__number> tt= <int_con> I <lnt_con>. .<int_ con> 

<int_con> ti= <integer_constant> 

*♦. 1.6.1 Fast ^tQraae_qLas.S. 

A variable declared with the #FAST storage class resides in 8 
hardware register whenever possible. It is loaded into a 
register whenever the variable is referenced and will stay in the 
register file until the register is required for another purpose 
by the compiler. 

Since a #FAST variable resides in the register file, the data 
type of the variable must be such that the variable will fit in a 
register. 

The type of register to which a *FAST variable is assigned is 
a function of the variable's data type. A direct pointer type or 
a iAUDPESS type will oe assigned to an A register, while all 
other #FAST variables will be assigned to X registers. 

Since registers are not aodressable as virtual memory, a #FAST 
variable can neither be made tne object of a pointer nor can it 
De passed by reference. 

The #FAST storage class is similar to the automatic storage 
class in that a #FAST variable is initialized, and is allocated 
upon elaboration of the declaration. A fast variaole can only be 
locally referenced. 
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t*.0 APPENDIX U - IPL MACHINE BREAKOUT 
<*•! .6.1 ' Fast Storage Class 



examn I el 
VAR 



FO-* 



injuction t CtfFAST] 0..255 t= lex ica l_leve t , 
link I (//FAST] ~ stack_frame i = current, 

induction 1= Induct ion DOWNTO DO 
linki= I Ink~.ol d_ I ink " . 



<♦.! 



FOtfENO 



A variable declaration containing a register storage class 
specification uoes not, in fact, result in storage allocation. 
It merely ossoci<itos a variable name and data tyce with a 
particular register or class of registers. The actual allocation 
of a hardware register to the register variable is accomplished 
with the luC<-*EG and FREEREG machine statements. 

If a register number is provided in the register storage class 
sDeci f i Cat i on then that particular register will be assigned to 
the variable nhon it is locked. If a subrange definition is 

oroviaed as tne register numoer then a register whose number is 
an element of that subrange will be assigned. Otherwise any 
available register of the correct class (#X or #A) will be 
all ocate j. 

Since a register variable never resides in virtual meirory, it 
can not be initialized, can not be made the object of a pointer, 
can not t»o passed by reference! and can only be locally 
referenced.' Tne data type of the variable must, of'ccurse, be 
sucn thvit the variable will, in fact, fit in a register. 



*♦.!./ MACHINE STATEMENTS 



Machine statements do not follow normal SWL syntax. A machine 

.statement is an uniaoeled statement that starts with en 
exclamation mark (*!') and ends in 5 semi-col on -(■;•) • 

There a<~ e two classes of machine statements! directives end 

instructions. Directives are oefined to coordirate the 

.illocotiDn of resources and implicit code generation between the 

pr3 jPaTner and the comoiler. Instructions result in the 
generation of soec i fie machine instructions. 



A ,T)d;hin^ itstement has tne following syntax. 
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*».Q APPFNDIX B - IPL MACHINE BREAKOUT 
k.1.7 MACHINE STATEMENTS 



<machine_statement> !t = ! <operator_f ie I d> I <ooerand_l 1st > ] 
<operator_f iel d> 11 = <operator> C ,<qual i f ier>> 
<operand_l ist> it= <operands> {, <operands>> 
<operands> it= <operand> 1 [<operand>C, <operand>> 1 
<operand> 11= <con:»tant_express ion> I <reg 1st er_vari abl e> 
<operator> it= <instruction_mnemonic> I <qual i f ier_mnemor Ic > 
** • i . 7 . 1 Maj:hJLQe_JlirjicjLbi£S 



<«.1.7.2 LQ£KR££_2Qa_F ££££££. 



The LOCKREG and FREEREG directives provide a mechanism for 
reservation and allocation of physical registers. The statements 
are the only method available for coordinating register 
reservation between the programmer and the compiler. 
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The FRElREG statement releases the registers identified in the 
register list. If no register list is present then all the 
registers are released. 



<lockreg__directive> t != LOCKREG t <r egister.l i st> J 
<reglster_l ist> tt= <rej_eUm> C,<rey_elen)>) 
<reg_elem> IJ= <regis ter_var iao i-'>l (<reg_number>) 1 
<frecreg_directive> 1 1- FRcEREG [<reg_variab le.J ist > 1 
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«».0 APPENDIX B - IPL MACHINE BREAKOUT 
<♦. 1.7.2 LOCKR'JG and FREcREG 



<rag_vdriable_l ist> it= <r eg_var lab I e> C ,<reg_var lab le>> 

Examplel 
VA- 

x0 : t#XREG(0) ] integer, 
dotl, dat2 : C#ARLG(5..6) ] 0ADORESS, 
ndol, bao2 t UARLG(9. .15) ] flADORESS, 
index : U aREG (2. . li>) ] 0..256? 

J LOCKPEG xj, ddtl(5), index', bdD2 (11. .1<0 * 

• • • • 
! FKEE*EG x0, index; 

*».i»7.2..i prologue and epilogue 

The PROLOG and EPILOG directives cause the generation of the 
correct SWL urologue and epilogue. The PROLOG directive must 
upDear .is the first executable statement of a code procedure or 
coje olocR if the procedure or block requires the existence of 
the \>tar-jarc SWL environment. 



*♦.!./. 3 ^c.hi.nfi_^ji_It-In_Fyrj£iXQns 



Machine bui I t- in functions are used in machine declarations or 
statp.ments as long as the drquments can be evaluated at compile 
time. Machine uuilt-in functions can also be used in normal SWL 
statements, 

*4. 1 . /. 3. 1 OFFSET FUNCTIONS 

The -'functions descrioed below can be used in nachlne 
st j foments • including instructions. The functions return an 
offset from a sDecitied base to a specified variable. 



0OFP ( <*r lament >L ,<oase>3 ) • • 

Tnis function returns a signed integer parcel (two byte) 
offset from the base (default is the current instruction 
locjtior) to tne jrqument • Poth t^Q arqument an3 the base (if 
ores-nt) most r.e either cocedure or label identifiers. 



tfOFU(<argumert >( , <bjse>] ) . 
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V. APPENDIX D - IPL MACHINE BREAKOUT 
<♦. 1.7*3.1 OFFoET FUNCTIONS 



This function returns a sijned integer byte offset from the 
base (aefualts to the start of the static area* constants area* 
and stacK frame for static variables* constants* and automatic 
variables, respectively) to the argument. The argument must be 
either a variable reference or a constant, ,Both the base and the 
argument must be aligned to byte boundaries. 



#0F3IT (orgument>( «<base> J) . 

This function returns a signed integer bit offset in a fashion 
identical with the #0FB function. Neither the base nor the 
argument* however* is required to be on a oyte boundary. 

<»*1*7. 3. 2 LENGTH FUNCTIONS. 

The functions described below return the length of the 
variable* 

#LENGC<variable>>. 

This function returns the byte length of the variable. 
#LENGBIT(<varlable>>. 

This function returns the bit length of the variable* 

<*.i.7.3.3 AOORESS FUNCTION 

The address function returns the virtual address of the 
argument. 

#AD0R (<variable>) 

<*.1.7.3.<* HEMORY FUNCTION 

The memory function al lows an arbitrary hexidecimal Dattern to 
be represented as a constant character string containing hex 
digits and blanks. The result is left-aligned when assigned. 
Blanhs in the character strinq are ignored. 

#M{<constan t_str ing>) • 

Example! VAK ha 1ft #BYTE<<*> 1 = #fi('00FA BCDE')? 
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k.O APPFNJIX 6 - IPL MACHINE BREAKOUT 
<»*i*7*t» Instructions 



'♦.l.f.'* lD^irujLLl5DS 



NAfc!E 



Descript Ion 



ffBOOL, A single bit* 

«C0N0 The condition register* 

tfCOLL Col lated. 

0OR Douole precision real* 

#EXT0 Extended 

exception flOVRFLO, #UN0Fl0* or #INOEF. 

OF Full word. 

field ^FORMAT , OKI NO »#LENGTH , #0FSET ,*IN0EX f #F f #M 

#h Half-word. 

i<nmed #ALPhA, 4 ALPHAF ILL* * BIN, #0EC 

//MAINT Maintainance register. 

flJLJCK Register Bl ocK. 

#NUM Numeric. 

//PAGE Paq* table. 

/K Peal . 

relation *EQ. 0GE, #GT* #LE* #LT t #NE. 

#.^UB^CR Suoscrioted. 

rtiTATL State register, * 

«UN Unnorma! izeo. 

0X0 Register X0. 

chars Integer constant* 1*2, 3,<t *5*6,7, 5* 

^.l./*5.1 INSTRUCTION OPERAND SYNTAX 

Xi, Xj, Xk **s <u XRCG_variables> 

Ai, a J, ah i: = <u AREG_vari jbles> 

Ji J **= <i r.teqer_const?nt s> 

u) » ;.k i: = [ <A_tdble> r *< A_variab1 e>] » CM 
<A_t.ble>, <A_variiole> i: = <tf A_var iabl e> 
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ii.O APPENDIX 3 - IPL MACHINE BREAKOUT 
■i». 1.7.5.2 INSTRUCTION DEFINITIONS BY NUMBER 



<*.1.7.5.2 INSTRUCTION UEFINITIONS BY NUMBER 

Nate that the following instruction syntax does not follow 
normal SHL conventions in that the square brackets appearing in 
this section are required even tnough they are not underlined in 
tnis section. 
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<*.0 APPENJIX ii - IPL MACHINE B?FAKOUT 
<*.1.7.5.2 INSTRUCTION DEFINITIONS BY NUM3ER 



££ti_Jifl*. 


1 


2 


3 


U 


5 


6 


7 


8 


9 


10 


11 


12 


13 


1( * 


15 


16 


17 


IP 


19 


20 



N A tIS-ANO QUALIF IERS 

LOAD, CHARS 

LOAD, CHARS 

STORE, CHARS 

STORE, CHARS 

LOAD 

LOAO 

STORE 

STORE 

LOAO,X0 

LOAO,X0 

STORE, X0 

STORE,X0 

LO A J, CHARS 

LOAD, BOOL 

STORE, BOOL 

LOAO 

LOAD 

STORE 

STORE 

LOAO, MULT 

STORE, FULT 

A 3D 



Q p £g*NIlS 

XKvCAJ ,Xi,dl 

XktlA] ,Q] 

Xk, C'AJt Xltd] 

Xk,[AJ,C3 

Xk,CA] ,Xi,dl 

XK,CAJ ,Q] 

Xk,[AJ «Xl,d) 

Xk,CAJ,C] 

Xk,CAJ,Xl,dl 

Xk,CA].QJ 

Xk,[AJ ,Xi,d3 

XK,[AJ,QJ 

Xk,[*P,C) 

Xk,CA],C3 

Xk,[A),Q] 

Ak,CAj ,XI,dl 

Ak,CAJ,Q] 

Ak.TAJ v Xi,dl 

Ak,IAJ,C) 

CA],<) 

I A],KJ 

Xk,XJ 
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<♦. APPENOIX B '- IPL MACHINE BREAKOUT 

<♦. 1.7. 5. 2 INSTRUCTION DEFINITIONS BY NUMBER 



ELLt— UOju 



NAMl and qualifiers 



GPESAM1S 



23 
Zk 
25 
26 
27 
28 
29 
30 
31 
32 
33 
3<» 
35 
36 
37 
38 
39 
<«0 
*»1 
kZ 
1*3 



SUB 

MULT 

DIV 

ABS 

AOD,H 

AOOtH 

ADD,H 

SUB,H 

SUB,H 

MULT.H 

MULT,H 

OIV,H 

COMP 

COMPtH 

BREU 

BRNE 

BRGT 

BRLE 

BREQ,H 

BRNE,H 

BRGT.H 



Xk,Xl 
Xk,X] 
Xk,XJ 
Xk,XJ 
Xk,X] 
XktCXJ ,QJ 

Xk,] 

Xk,X) 

Xk,) 

Xk,XJ 

Xk,CX)tQ3 

XKtXJ 

Xk,XJ 

Xk , XJ 

Xj,XK»Q . 

X),Xk,Q 

X),Xk,Q 

X),Xk,Q 

XJ ,Xk,Q 

XJ, Xk, Q 

X),Xk,Q 
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<*.0 APPENDIX o - IPL MACHINE BREAKOUT 
<«.1.7.5.2 INSTRUCTION JLFINITIONS Br NUMBER 



li££j .NH!_ 

i*k 
<*5 
<*6 

*7- 
k& 
<«9 
50 
51 
SZ 
53 

55 
56 
57 
58 
59 
60 
61 
62 
63 

b5 



NAnf^ANfi^fiyALlFI^SS 

BRLE,H 
OOLOOP 
BR 
BR 
BR 

COPY 
COPY 
COPY 
.COPY 
COPY,H 
ADD 
ADO',P 
ADO 

COPY,H 
COPY,H 
COPY.EXTO 
COPY,X0 
COPY, SIGN 
ROTATE 
SHIFT 
SHIFT,H 
OR 



OPERAN DS 

XJ,Xk,Q 

XJ,X*,Q 

AJtAk.Q 

CtfP.Xk] 

A J ,Xk 

Xk,XJ 

Xk,A] 

Ak.Aj 

Ak,AJ 

Xk,Xj 

Ak,[AJ t Q3 

Ak,lXJ,QJ 

Ak,Q 

Xk,J 

Xk, J 

Xk , Q 

JK 

Xk,J 

XK,X], CXi,d] 

Xk,XJ,[Xi f d! 

Xk f Xj t CXi,d3 

Xk,Xj 



NCR/COC PRIVATE 



IPL-SQFFWARE ENGINEERING SYSTEM 
ISWL/CI V2.0 ERS 



<»-16 

09/01/75 

REVt B 



k.Q APPENDIX 6 - IPL MACHINE BREAKOUT 
<♦.!.?. 5. 2 iNSrRUCTION DEFINITIONS BY NUMBER 



KEfi. USU- 


NAtf£_AHQ_QliAUEIE££ 


OPERANDS 


66 


XOR 


Xk,XJ 


67 


AND 


Xk,Xi 


68 


NOT 


Xk,XJ 


69 


INHIB 


Xk.X) 


70 


MASK 


XKtCXltd] 


71 


ISOLATE 


Xk,XJ,(Xl«d) 


72 


INSERT 


Xk,XJ,[XI,dl 


73 


MOVE 


Ak-tAJ 


7h 


ADD 


Dk f DJ 


75 


SUB 


Dk,DJ 


76 


MULT 


DK,0] 


77 


OIV 


Ok,OJ 


76 


SCALE 


Dk f DJ 


79 


SCALERCUNO 


Ck»OJ 


80 


N/A 




81 


N/A 




82 


N/A 




83 


COMP,UEC 


Dk,DJ 


6<* 


COMP 


Ok f DJ 


85 


COMP,COLL 


Dk,D) 


86 


SCAN 


Ok,Oj 


87 


N/A 
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<»«0 APPENDIX B - I°L MACHINE BREAKOUT 
<».1.7.5.2 INSTRUCTION DEFINITIONS BY NUMBER 



£i»- • 1\U- 


NA^L-ANQ-flUAUF 


!£££ 


operas 


38 


TRANSLATE 




Dk,OJ 


89 


MOVE 




Dk,OJ 


90 


N/A 






91 


EDIT 




Dk,D] 


92 


MOVEfNUM 




Ck.OJ 


93 


N/A 






" 9<». 


MOVE, field 


ffleld 


Dk.OJ 


95 


ADD, field, 


field 


Ok,OJ 


96 


■'. CALCSUB 




Ok,nj 


J 7 


CONV,R 




Xk.XJ 


98 


CONV 




XK,XJ 


99 


ADD»R 




Xk,XJ 


10 


SUB,R 




Xk,XJ 


101 


ADD, R, UN 




Xk,XJ 


10 2 


SUB,R,UN 




Xk,X] 


■103 


MULT,R 




Xk,XJ 


10<* 


DIV.R 




Xk,Xj 


1J5 


ADD,DR 




XK-.XJ 


1U6 


SUB,DR 




XkpXJ 


107 


MULT, OR 




Xk.XJ 


10 8 


OIV, OR 




Xk.XJ 


109 


3*E1,K 




XJ,Xk,Q 



NCR/COC PRIVATE 



IPL-SOFTHARE ENGINEERING SYSTEM 
ISWL/CI V2.Q ERS 



4-18 

09/01/75 
REVt 8 



4.0 APPENDIX 8 - IPL MACHINE BREAKOUT 
4.1.7.5.2 INSTRUCTION DEFINITIONS BY NUMBER 



P£F t NO, 


NAME AND QUALIFIERS 


QPtRAiaas 


110 


BRNE.R 


XJ,Xk,Q 


ill 


BRGT,R 


XJ,Xk,Q 


112 


BRLE.R 


XJ ,XK,Q 


113 


B?, exception 


Xk,Q 


114 


COMP,R 


XJ ,Xk 


115 


CALL 


[Al,d] ,AJ,Ak 


116 


CALL 


UP,QT,AJ,Ak 


117 


RETURN 




118 


POP 




119 


N/A 




12 


EXCHANGE 




121 


ERROR 




122 


INTRPT 


JtXk 


124 


INTRPTPROD 


Xk 


124 


LOAD, CLEAR 


*> 


125 


COMP 


Xk,AJ 


126 


COMP, PAGE 




127 


LOAD, PAGE 


XJ,Xk 


128 


N/A 




129 


N/A 




130 


LOAD, STATE 


Xk , XJ 


.131 


STORE, STATE 


Xk,XJ 
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4.0 APPENDIX R - IPL MACHINE BREAKOUT 

«♦. 1.7.5.2 riSI AUCTION DEFINITIONS BY NUMBER 



132 
133 
134 
135 
136 
137 
13« 
139 
1<*Q 
141 
142 
143 
144 
14b 
146 
147 
148 
149 
15 
15 i 



■ »\L AN|} QUALIFIES* 


flEEsms 


LOAJ,MAINT 


Xk , XJ 


STORE, MAINT 


Xk,XJ 


BR,COND 


JK.Q 


N/A 




KEYPOINT 




N/A 




PURGE 




ALGORITHM 




.N/A 




N/A 




N/A 




AUD,IMM 


Xk.CX] «Q] 


COMP 


AJ*Ak 


CONV, relation 


Xk 


STORE, field 


DkvXJ 


LOAO, field 


Xk,DJ 


ADD, field 


Ok.XJ 


SU3, field 


Dk,XJ 


AND 


Dk,DJ 


OR 


Dk,DJ 
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k.Q APPtNOIX 3 - IPL MACHINE BREAKOUT 
-J»«i»7«5.2 INSTRUCTION DEFINITIONS BY NUMBER 



E££i NOx. 



NAMg; AND QU ALIF IERS 



fiPLEMEIi 



152 
153 
15<# 
155 
156 
157 
158 
159 



XOR 

NOT 

COPYtlMMED 

COMP,IPMED 

ADD,IMMEO 

LOAD 

LOAD 

STORE 



Ok, 01 

DK,0) 

DKiQ 

Ok,Q 

Ok,Q 

Ak,OJ 

Xk,0J 

Xk,0 



*.2 IPL ■H AC flJLU£,flBEAK0»UIfl8BECTIflM5 



This section describes corrections to the IPL Machine Breakout 
memo (see section entitled, M IPL MACHINE BREAKOUT" — (REVISION 
8)) . 



*»,2»1 MACHINE BREAKOUT CORRECTIONS 



<byte.Jenqth> tl= <oosi ti ve_ constant. integer_express ion> 

<byte_a I igrment> u= 2*»n (whore < n < 8) 

(The *♦ operator is the exponentiation operator) 

<bit_type> 11= #BIT ( <bi t _length>[ ,bi t_of f set>] ) 
<bit_lenyth> I 1= <pos it i ve_i rteger_constant > 
<bit_offset> ii= <posit i ve_i nteqer_constant> 

(from byte bounoary) 

(<bi t_length> ♦ <bit_offset> < bM) 

TYPE 

#DE3CR = 

PACKED RECORD 

format l 0B1T(1> , 
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dummy l #311 (2) , 
tag t t»BIT(<*), 
length I #3IT (9) , 
offset i #byte(2,2) 
RlCENJ . 

Two functions have been added, ffTOFB and #TOFBIT» These 
functions are analogous to the functions #OFB and #OFBIT, 
witn the exception that the first argument is a tyoe 
identifier of a record definition and the second argument 
is a field identifier of a field within the record* 



0TOFB (<tyoe_i d>, <f iel d_i cent i f ier>) 
//T0F3IT (<tyoe_id> ,<f ield_identi f ier>) 
<f iel J_ident ifler> fi= <ioentifier> 
<tyDe_id> :t= <type identifiers 
<tyoe_ident i f ier> ::= <iJentifier> 

- Tne follohing corrections Dertain to the section entitled 
"Instructions". within the "IPL Machine 9reakout** 
dOperrJi x . 

- The following qualifiers should be added* 

AMUlI 

#1 MM 

#P 

l/SIGN 

#0EC '- . 

#SET 

- J,K»a,Q t= <integer constant> 

- All upper case qualifiers should be preceded by the 

character, number sign, 

- All occurrences of the uooer case string CHARS should be 
r-.»plc,ceci by the lower c=jse string chars. 

- All occurrences of the string BRLE should be replaced by 

3KGh.# 

- F.jr ri'fer^nce numbers bh through 56, the name should be 
cnangej to ADDA. 

- For reference number 56, the operands should be Ak,X]« 

- K or reference numoers 57 through 61, the name should be 

NCK/CDC PRIVATE 
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<».Q APPENDIX B - IPL MACHINE BREAKOUT 
7*. 2.1 MACHINE BREAKOUT COR«ECIIONS 



ENTER. 

- For reference number 57, the qualifier should be POS. 

- For reference number 58, the qualifier should be NEG • 

- For reference number 52, the operands should be Ak»XJ. 

- For reference number 67, the operands should be Xk»X). 

'- For reference number 95, the name and qualifiers should be 
ADO, field, field. 

- For reference number 112, the name should be BRGE. 

- For reference number 113, the qualifier should be 
exception. 

• For reference number 12^, the qualifier should be SET and 
the operands should be XK,AJ. 

- For reference number 122, the operands should be Xk. 

• For reference number 136, the operands should be XK,),Q. 

• For reference number 138, the operands should be Xk,Q. 

• For reference number 139, the name and qual if i ers shoul o 
be ALGORITHM, chars, and the operanas should be A],Ak,Q. 

- For reference number 1^5, the qualifier does not allow all 
possible J specifications. 

• For reference numbers 150 through 153, the operand field 
shou Id be A) »Ak. 

- For reference numbers 15<* through 156, the qualifier 
Should be lower case immed. 

- For reference number 159, the operands should be X],Dk. 

• For reference numoer 153, the name should be MCC • 
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5. AHPE-'IUIX C - COMPILATION ERRORS 



This section contains the oefinition of the compilation error 
code* output by the passes of the ISWL/CI V2.0 compiler. 



5. i p&ss-i-£g3fla-cgae.-a£FiiiiTi qN S. 



Tne arror message generated by PASS I immediate I y fo I low the 
source line in which the error occurred on the output listing 
(see section entitled, "COMPILE* OUTPUT") and are of the 
foil owing t orm: 



**«.**•******* 



error code 



The table below associates error codes with their definition. 
The total nurcoer of PASS I errors which is detected is written 
onto tne listing tile in the followirg f ormi 

x t*=Jk(S) WE<?E JETECTEO 



1 
2 
3 

<♦ 
5 
b 
7 
6 
9 : 

10 t 

11 I 

12 ? 

13 : 

14 : 
lb : 

n * 
«f.) : 
21 i 



ocihr Type or Type Identifier expected 

Identifier expected 

Error in valuu punctuation 

• ) • expect ed 

• t • expected 

I lloja 1/unexoecteJ symbol 

Lr»'or in pbrimetor list 

CP" expected 

( * expected 

I I e )e\ t voe 

[ • exoec tej 

J • expected 

cND* .**pected- 

{• exuicfpc 

= • expect ej 

R-TENJ' exn.'cted 

rr*cr m r'ieli List, Ident i f i er or 'CASE* expected 

♦ • ^ xcected 

M ;0uLL" expected 
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5.Q APPENDIX C - COMPILATION ERRORS 
5.1 PAS.* I ERROR CODE DEFINITIONS 



22 
23 
24 
2* 
26 
27 
2d 
29 
30 
31 
32 
33 
34 
35 
36 
37 
3d 
39 
40 
41 

42 

43 

44 

50 

51 

52 

53 

54 

55 

5* 

59 

60 

61 

62 

63 

99 

100 

101 

10 2 

103 

104 

105 

106 

107 

108 

110 

111 



Illejal Symbol or Punc 
Semicolon may not aooe 
•IFEND* expected 
*Hr1ILtND , expected 
••LOOPEhD* expected 
'FOkEND* expected 
•CAScNu" expected 
•$• or '#• expected 
'P*OC (END)* expected 
CYCLE target not repet 
Inva I Id attribute 
EXIT not properly cont 
•CRAMMED' exoecteu 
Crimea structured mus 
•••' expected 
""*• expected 
Type Iaentifier expect 
Conflictioj Attributes 
Varidble bounds in sta 
Adaptable or Bound Var 
list or adaotaole poin 
Feature illegal outsid 
II legal PkONG class 
Macnine types illegal 
Error in constant 
• t =' expected 
•ThEN - expected 
•UNTIL* expected 
•00' expected 
•TO/OOWNTO- expected 
Error in factor 
Dynamic variaole refer 
Inconsistent module id 
PRONG not declared 
Illegal vdrijble refer 
Illegal label ounctuat 
Value exceeds range 
Assignment/Index range 
Multiple aeclaration o 
Lower Bound must be le 
Identifier not of aopr 
Unaec lared identifier 
S i ^n not permitted 
Numbar exoected 
Incompatio I e subrange 
Inval id type for this 
TagtieM type must be 
Selector incompatible 



tuation 

ar in comment 



ltive 
alned 
t be Array or Record 

ed 

tic domain i I legal 
lant type in parameter 
ter ob) ect on ly 
e REPDEP procedures 

without CODE attribute 



ence illegal in this context 
entification or nesting 

ence 
ions 

error 

f identifier 
ss than Upoer Bound 

ooriate class ■ 



types 

structure 

Sea l.ir or Subrange 

wi th Tagf ie I d type 
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5.0 APPLNJlX C - COMPILATION ERRORS 

5.1 PASS I EKROR CODE DEFINITIONS 



113 
114 
116 
117 
lid 
120 
123 
125 
12 b 
129 
130 
131 
132 
134 
135 
13b 
.137 
13.4 
139 
140 
141 
142 
143 
144 
145 
147 
14-5 
V>Q 
151 
152 
l'io 
160 
161 
165 
lob 
170 
171 
172 
173 
174 
17b 
17b 
177 
17 \ 
179 
140 

m 

142 



Index type must 
Seal jr type mus 
Error in type o 
Unsatisfied for 
Pointer with fo 
Func t ion resu I t 
Eauivalent type 
Error in tyoe o 
Njmoor.' >1 v«3 lu<? 
Tyoe conf I ict o 
Expression is 
Only tests on e 
Str ic t inc I usio 
Illegal tyoe of 
Tyoe of operand 
Set element mus 
Value incompsti 
V or i db I e must b 
Injex iriconpati 
Varioole must b 
Tyoe of v3riabl 
II legal paramet 
Illegal type of 
Expression tyo« 
T yue con f I ict 
Type incompatible w 
Suoringe pounds mus 
Assignment to stand 
Assignment to forma 
No such f ie I 1 ii\ th 
Mul t i c«_-f int»o case s 
Previous declaratio 
Procedure prev/iousi 
M u * I i a e f i n e a I a b e I 
Undec I are J exit I ib 
Vari^rt tag must be 
P.jCK/Crjm attribute 
Initialization i I le 
Value constructor m 
V 3 I u o T y u •? i n c o m o * t 
ti.v_,e soeci f icat ioa 
Crammed recoro must 
Wi.itn specification 
Gci^ct si.;e excels 
E I ^rent must oe fix 
Inval i a a J a p tat> I e s 
bujr-.jr^^ -nJst ue f i 
: Multiple/ II I ij.=il 



bp Non-Rea 
t not be Re 
f st3ncard 
ward refere 
rward REF t 

must oe Sc 
s in UNION 
f standard 
s dOcS no t 
f operands 
o t of set t 
.quality all 
n not allow 

oner-ana (s) 

•nust be Oo 
t be ■ N on- Re 
ole with se 
e of array 
d I •-* with a e 
g of record 
e Tiust be P 
er suostitu 

loop contr 

illegal 



I Scalar or Subrange 

a! 

procedure parameter 

nee 

ype must be f ixed 

alar. Subrange or Pointer 

dec larat i on 

function parameter 

match declaration 

ype 

owed 

ed 

loan or Set 
a I Scalar or Subrange 
t e I ement 
tyoe 
claratlons 

t ype 
o in ter 
tion 

01 variable 



itn selection expression 

t be Scalar 

arc f uncti on I I I egal 

I tunct ion i I lega I 

is record 

elector 

ns was not forward 

y forward declared 



el 

init la I ized 

i I leqal on this tyoe 
gal in this context/on this type 
3y contain •*• only in initialization 
ible with aeclaration 
required 

be fixed bound 

re oui red 

Hidtr specifications 

d size 
UDrcn^e 

xec bound for crammed 
riant* var iabl e bound, adaptable fields 
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ldi 

185 
136 
187 
188 
189 
190 
191 
192 
193 
19^ 
U5 
196 
197 
198 
199 
201 
202 
203 
205 
206 
207 
203 
209 
210 
211 
213 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
ZZk 
2 35 
236 
237 
238 



Selector must be constant 
Invalid parental tyoe for rel 
Invalid pointer object type 
Integer expression expected 
Invalid string length 
String object type must be CH 
Object must be data type 
Value' list does not match dec 
Tug value must be constant 
Tag value not in selector ran 
'Static initialization by cons 
Value out of set range (U.. 2b 
Assignment to external functl 
Tyoe of vdriaole must be stri 
Substring lenjth exceeds sour 
Assignment expression, not UNI 
Invalid UNION. member type 
Error in constant - digit 2x0 
Striny in constant contains i 
Integer constant too large 
Constant expected 
Exponent too large/out of ran 
Symbo I too I onq 
Radix not numeric 
Radix out of range 
Inval id radix 
Invalid digit in radix 
Positive integer expected 
Unknown machine type 
Machine dependent construct i 
Machine type cannot be object 
Value exceeds register range 
Machine class variaoles canno 
Type incompatible with reglst 
Register class may not be ini 
Field reference to AREG varia 
Invalid declaration/statement 
Type must oe UNION 
Conformity operator expected 
II I egal qua I i f i er 
Illegal operation code 
IMegdl instruction format 
Illegal us* ot two Qualifiers 
• Variable unknown locally 
Variable tiust be register rla 
Register descriptor on loc* o 
Register out of r a nge 
All registers locked (overflo 



ative pointer 



AR 






larat Ion 






ge 






tants only 






5) 






on i 1 1 egal 






ng 






ce 1 ength 






CN member 






ected 






nval id del I 


meter 


<EOL) 



ge 



lleqal 

of pointer 
for IPL 

it be PRONG or STATIC 
er class 
tial ized 
bl e i I leqa I 

without prolog 



ss 
nly 



w) 
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239 

2WU 

Zhl 

2*2 

2^3 

2'*t* 

250 

2-31 

298 

399 

<*0J» i 

<*01*: 

<+02*r 

*♦ Ji *: 

*0<»*: 

^05 t 
' ^07*: 

NOTE I 



Register .not. locked 

Illegal Operana field in this position 

Unrecognizable operand field 

Global reference to register variable Illegal 

Machine type constructors may only contain constants 

Ony variant records may be 'bound' 

loo many nested SCOPE environments 

Compile t i me di so I ay vector overflow 

Relevent symbol found 

Ke jfjr? not suoDorted 

Compiler error in LOAUVALU/LOAOATTRTO/SELECTOR 

Co^ipi k-r error in LOAO 

Compiler error in LOAOAOORESS 

Cjuoiler error in STORE 

Compiler error in BOA TALOC/LOADAOORESS/SELECTOR 

regarding machine classes 

Only machine types hQre 

ComDi I er error 

Tno error codes marked by an asterisk indicate either a 
programming error or a compiler failure. If you obtain 
one of these error codest first oeruse your program for 
programming errors? and if no errors are discovered* you 
*nould use the PSK Bug Reporting mechanism described in 
the SES User's Handbook to report the problem. 



5.2 o 



A^S^I^ti^ois^i^OLJt^EFiNixjQy 



The error messages generated by PASS II immediately follow 
either the "source form'Von the compiler listing file or follow 
the message! "x ERROrMS) WERF OlFlCTEO , wnich also is on the 
listing filo. Tne messages have the following generic f crmx 



"message text' 
PCO.iE = P^v 



COUNT yyy zzz 



message text" is the error message and zzz is the "LINE" field 
on t^cooDik»r listing file. (See section entitled, "Compiler 
Outouf.) The other information should be ignored. 



I he 



var 1 ojs 



f orms 



of 



CO 

o 



roessaoe text" are listed below. The 
olons ore not included in "ressjge text" and serve the function 
f "U'ssj^ text" seoar^tors. 



•*l *.UT Jl- ARrGS 

* a ■ rftolSTL"? lUCisED TARlE OVERFLOW 
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I A REGISTER LOCKED TABLE OVERFLOW 

.M RE-ASSIGN" XREG FAILEO, CLEARXREG CALLEO 

>t PUSHSTACK FOUND NO REGS 

♦» *TS Ii> UNAVAILABLE BECAUSE PROLOG INHIBITED 

♦I NO KEG FOR POPSTACK 

♦I POPSTACK FAlLcD IRRFCO VERABLY 

M NO RlG FOR PUSH 

♦I PUSH^Lu - kcG MODEL FAILURE 

♦I OPERAND SIACK OVERFLOW 

*l CPFGANO STACK UNDERFLOW 

♦* POPPING A MARK 

•♦I LOCK<PEG - NO HOLD OR PKEASSIGNED REG 

*♦* NO AGISTERS FOR LOCKAREG 

t ^YMdJL FOR X REGISTER ALREADY LCCKEO 

I I RLE FOR UNLOCKED X REGISTER 

I FKuE FOk UNKNOWN X KEGISTER SYMBOL 

1 JYHBOL FOR A REGISTER ALREADY LOCKED 

t FREE OF UNLOCKED A REGISTER 

1 I- REE OF UNKNOWN A REGISTER SYMBOL 

*♦! mSSI^NMENT OF X2 FAILED 

••I GENCUP - FUNC REG UNAVAIL 

I RcPLACEO BY - 

•»t UNKNOWN X REG 10 

»*t UNKNOWN A REG ID 

*t MORE THAN ONE OPtRANO FOR FUNCTION ' 

t DESC. VAR REG NOT 8-F 

t C-ESC. TAiiLE REG NOT <*-5 

t UNLOCKED REFERENCE TO REG ID 

♦♦I ->OME FORWARD LAJEL REFERENCES UNSATISFIED 

** BAD -MODIFIER 

1 ADDRESS IN RTS 

•♦I GENUA P - FUNC REG UNAVAIL 

I uENCXP - FUNC REG LOCKED 

♦t LNKNOWN XREF NAME 

t GENCUP - FUNC REG LOCKED 

*t QUALIFIER INCORRECT 

♦f MAKEXAVAIL SIACK FAILEO 

•I f.AKEXAVAlL FAILED 

+1 UNuEFlNEO CONSTRUCT 

**1 OPERAND OVERFLOW 
•*1'NEG.' VALUE FOR UNSIGNED FIELD 

♦I DUPLICATE LABELS 

1 UNlMPLEMEUl ED 

NOTE* The forms of "message text" which are preceded by ar 
asterisk indicate compiler failure. If you obtain one of 
these error messages* you should use the PSR Bug Reporting 
m?chani*_>'n described ir the SES User's Handbook. The forms 
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of "message text" which are preceded by two asterisks 
indicate programmer error or compiler. If you obtain one 
of tnese error messages* you snould peruse your program 
for pro-jrcinminq errors on line . ZZZ. If no programming 
error is detectedt you shculd use the PSR 3ug Reporting 
mechanism. 
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6.0 A£££dUI&..U,=,I£JL,lSaJL,K5S££^£lL.HflSaS 



A list of reserved words Is given Delow. Words preceded by a 
double asterisk* ** t are reserved words in the ISWL/CC and are 
not reserved words in ISHL/CI. Words preceded by an asterisk* ♦* 
are r'eserved words in ISWL/CI and are not reserved words in 
ISWL/CC. Words which are not preceded by one or two asterisks 
are reserveo words in both ISWL/CC and ISWL/CI. 



♦ALIAS 


♦♦NIL 


ALIGNEU 


♦NIN 


ALLCCATE 


NOT 


AND 


OF 


A^Af 


♦ON 


BEGIN 


♦♦OPES 


♦BOUND 


OR 


BY 


ORIF , 


♦CANO 


• PACKED 


CASE 


POP 


CASENJ 


PrfOC 


CAT 


PROUEND 


♦♦CLOSE 


♦PROLOG 


CODE 


PUSH 


CONST 


♦♦QUEUE 


COPROC 


RECEND 


CRAMMED 


RECORD 


CP=.A1E 


REF 


CYCLE 


REL 


♦♦DEFINE 


REP 


♦♦DEQUEUE 


REPOEP 


DESIROY 


REPEAT 


DO 


RESET 


D3WNTQ 


. RESUME 


ELSE 


RETURN 


ENJ 


♦♦REWIND 


♦♦ENQUEUE • 


SlGMENT 


♦EPILOG 


SEQ 


♦♦EXECUTE 


SET 


EXIT 


S! ACK 


EXTERNAL 


STATIC 


♦♦FILE 


STRING 


FCR 


♦♦TAG 
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FORENO • 
♦FORWARD 

FP-F 
♦FfcEt.KEG 
♦GET 

GCTO 

hPAP 

IF 

IFENO 

IN 

LA3EL 
♦LOCKREG 

LOOP 

LOOPEND" 

MACRO 

MAC*UEND 
♦MAIN 
♦M^LIbNED 

MOJ 

MiJUEND 
MODULE 
NEXT 



THEN 
TO 
TYPE 
UNION 
UMPACKEJ 
UUTIL 
♦UOR 
VAL 
VAR 
♦VSTRING 
'♦WEOF 
WHEN 
WHILE 
WHILENO 
XDCL 
XOR 
XREF 
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7.0 APPfNUj 



&S£ttaL3L,U!ifimfiE. DEscsiPiiaa 



The purpose of this section is to describe the IPL assembler 
mneumonics output by the compiler ntwn the "C" comment toggle is 
selected. <See section entitled, COMPILER OUTPUT*) 

The compiler identifies each symbolic instruction mneumonic 
according to its syntax and generates a 16- or 32-bit 
instruction. The table below indicates the translation of 
asseT.oler mneumonics a^d operand fields to the IPL machine 
instructions (see IPL Processor-Memory Model Independent GDS ) • 
The first and seconJ columns of the table indicate* by reference 
numoer and opcode respectively! the instruction generated for the 
assembler menumonic in the third column. The forth column is the 
operand field of the instruction and specifies the order from 
left to right of the operands. 
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7.3 APPlNDIX t - ASSEMBLY LANGUAGE DESCRIPTION. 

♦ -- — ♦ — — ♦ ♦-— — .«. 

I GOS I J IPL I | 

I RET I OP I ASSEMBLER I OPERAND I 
I NO. I COOw I MNEUMONIC I FIELD I 
♦ ♦ ♦ 4 ♦ 

I U01 I DO I LBYXIS I S,J,K,I,DI 

•.♦ — —-♦ 4 -♦-- * 

.i-l 002 I CO I LBYXS I S,J,K,Q I 

♦ "«■ ♦ ♦-- -4 

I 003 I Jfl I SBYXI5 I S,J,KtI,DI 

♦ 4-~~-4 --♦ * 

I 0Q<*. I Cfl I SBYXS I S,J,< t Q I 

* ♦ 4 * + 

I 0J5 I A2- I LWXI * J J.K.I.D I 

♦--- — *-- 4— ■ — f * 

I 006 I 32 I LHX I J.K.Q I 

* ♦ ♦ — ---: 4 ♦ 

I 007 I A3 I SWXI J J,K,I,D I 

♦ 4 4 * _* 

I 008 I 63 I SWX I J,^,a I 

♦ * --4 *- * 

I 009 I A!» I LBYXIX I J,K,I,D I 

* -* 4 — — ..♦ 4. 

I ■ U10 I 6k I LBYXX i J.K.Q I 

* 4 - + _— * «. 

I 011 I A5 I SBYXIX I J f K,I,0 I 

■ ♦ ~ + * -- — -«■ — -4 

I 012 I 85 I SBYXX I J,< t Q | 

♦ f ._._..+ --,---♦- + . 
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4_....4......4 ... ....4. ........ .4 

I GOS I I IPL I I 

I REF t OP I ASSEMULlR I QPLRANO ! 
I NO. I CODE I 'MNEUMONIC I FIELD I 

4 — - — 4 4. f . — .4 

I 053 I Ou ! CPHXX I J,K I 
4. ....4 ...... 4...-- ...... 4-. — .4 

I 05** I 8E I UPAOD I J,K,Q I 
+ ..... + ...--.4. —4. .-4 

I 055 I 8F I CP I J,K,Q ! 
+ 4. — . + . . 4... ......4. 

! 056 I 2A I AINO J J,K I 

4 * ..-4. .4 ..-4 

I 057 I 3J ! EXPJ I J,K I 

4. 4 4-. . --4 ....4 

! 058 I 3£ 1 EXHJ I J,K I 

4- 4.- -4-. ...... ...4.. ......4 

! 053 I 80 J EXQ 1 K,Q. I 

4 4.. ..4 ... — 4--. ...-.4 

I 060 I 3F I EHLG 1 J,K I 

4- 4. --...4 4 ....-4 

I 061 I . IF 1 EXL I J,K I 

4 4...... 4 .. 4 ....4 

I 062 I A8 I SHXC I J,K, I t D I 
4. 4 .4 ......4. ..4 

I 063 I A9 I SHX I J,K,I,D I 
4. 4 ...4.. ...... 4...... ....4 

t 06<* I AA t SHHX I J,K, I,D 1 
4-. 4.. ...-4 . 4.. ...... ..4 

I 065 I 18 I LS I JiK I 

4 — 4- ---♦ f : -♦ 

I U66 \ 19 i LD I J,K I 

4 4 4 . 4 .-4 

I 067 I 1A \ LP I J,K I 

4 4- 4 -—4 . 4 

1 068 I 10 I LC I J,K 1 
4.. 4 ..4.-. ...— 4 .. — 4 

I d69 I 1C I LINN I J,< I 

4 -4. ...4........... 4. --...-4 

I 070 ! AC ! ISOM I K,I,D I 

4 4..... .4 — -.— 4 4 

» 071 I AD I ISOX I J,K,I ,D » 

4--. --4 4--- .--*■ ♦ 

I 072 I A' I INSX I J,K, 1,0 I 

4 ._-4— 4-. ....... .-.4. ---4 
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... — 4 -.-..-4. 4.. — ......4 

GDS I I IPL I I 

RLF I OP I ASSEMBLtR I OPERAND 1 
NO. I CODE I MNEUMONIC I FIELD I 



73 I 12 



I MC 



I J,K 



I 



i)7k 1 EJ 
I 



I DS 
I 



1 J0,Jlt<3 I 
I K1,QJ,Q1 I 



u75 I £i 
I 



I DO 

I 



1 J0,J1,<0 I 
I K1,Q0,Q1 I 



076 I E2 
I 



I DP 
1 



I J0,J1,K0 I 
I K1,0G,Q1 I 



077 I E3 
I 



I DO 
I 



I J0,J1,K0 I 
I KitQd.Qi I 



078 t £<♦ 
I 



I- DSCAL 
I 



J J0,J1,K0 I 
I K1,Q0,Q1 I 



079 t E5 



I OSCALR 

I 



! J0,J1,K0 t 
I K1,4 0,Q1 I 



083 I E6 
I 



I OFCOM 

I 



I J0.J1.K0 I 
I K1,Q0,Q1 I 



U8*t I E8 
I 



I JBCOM 
I 



I J0,J1,K0 1 
t <1,Q0,Q1 I 



085 I E9 
I 



! OBCOL 

t 



I JQ,J1,K0 I 

1 Ki,ao,ai t 



086 I EA 

I 



t ODSCAN 
J 



I J0,J1,K0 I 
! KitQJiQl I 



088 I tB " I OTRAN 



I JO.Jl.KO I 
I K1.Q0.Q1 I 



08^ I tC I DBMV 

J I 



1 jn,ji,KQ I 

I Klt2 0,Ql ! 
.4 . --4 
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4. — --- + - 4 4 . 4 

I GOS I I IPL I I 

I REF I OP I ASSEMBLLR I OPtRAND t 
I NO, I CODE I MNEUMUMC I FIELD I 

4~--.-4* — --- + . — ♦-——- — -♦ 

t 091 I EO I DEOIT l.-JOi J-1»K0 ! 
I I t i KitQOtQl I 
4. + - 4 —.4. ,4. 

I 092 I E7 I DNMV I J0,J1,K0 I 

I I I I Kl,O0,Ql I 

4. — .. .4.- -.4 . + - * 4. 

I 094 I EE ! DTABMV I J0,J1,K0 I 

! I I --."I- K1,Q0,Q1 I 

->«.. 4--~ 4 — .4- -4 

! 095 I EF ! OOFI I J0,J1,KQ I 

I I .1 t .K1,Q0,Q1 I 

4 . — f--« 4 — . ..•.•.4 4 

I 096 I F4 I OCALSB I J0,J1,K0 I 

I I I 1 Kl.QOiQl I 

♦— - — f- — --.-.4------ + - --*• 

I 097 I 3A I FCFP I J,K I 

4... ..4 ...... 4- .--.-.- — «4 4 

» 098 J 38 I FCI I J,K ! 

4. .--+-_--.-+ — .••.4. -----4 

I 099 ! 30 I FS ' I J,K I 

4 — + «_ + 4-: • 4 

I 100 I 31 I FO I J,K I 

4...- — 4 ••-4 .•..-.-4 -«...- 4. 

I 131 I 33 J FSU I J,K I 

4 « — 4. -4 •• — .4 -••....•_ -.4 

I ■ 102 I 39 I FOU I J,K I 

4 4 4 — 4 ---4 

I 10 3 1 32 1 FP I J,< I 

4.- 4-- .-4 .•.—•4 -.--f 

I 104 1 33 I FO I J,< I 

4- ----4 --.4 --4 -— ♦ 

I 105 I 34 I FSDP U,K I 

4----- + - — ..-4-. ...4.. ...--4. 

\ 106 ! 35 ! FODP I J,K I 

4--. — 4. -.4 •-•••••• 4 -—-.--- -<•♦ . 

I 107 I 36 I FPDP I J,K ! 

4«-« --4. --.--.4 •••.... 4. — •.•••4 

I 109 I 37 \ FQDP \ J,K ' I 

♦ — --- 4 • — ••4.—. ----—4-, — — ••— -4 

I 10 9 I 11 1 FUt.'X I JfKf Q I 

4- |- — 4-- 4 ---♦ 
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I GOS 


I 




t 


IPL 


- r- 

I 








1 REF 


J 


OP 


1 


ASSLM3LER 


I 


OPERANO 


1 


1 NO. 


I 


CODE 


1 


MNEUMONIC 


1 


FIELD 


! 


1 110 


1 


99 


t 


FBNE 


I 


Jt<, 


a 


I 


1 111 


J 


9A 


» 


F3GT 


! 


J»K, 


Q 


I 


1 112 


{ 


9:/ 


1 


FBNLN 


i 


JiK, 


a 


1 


1 113 


1 


9i 


1 


FBEX 


1 


J.K, 


a 


! 


J 114 


\ 


3C 


1 


FCOM 


1 


J,K 




! 


J 115 


1 


A6 


1 


CALLJ 


J 


J»K. 


1*0 


1 


1 116 


I 


BO 


1 


CAlLP 


1 


JiK, 


a 


1 


1 11? 


1 


04 


I 


RET 


1 






1 


1 118 


1 


06 


1 


POP 


1 






! 


1 120 


i 


02 


1 


EXCH 


I 






t 


J 121 


1 


OU 


I 


PE 


\ 






I 


1 122 


I 


03 


1 


INPC 


\ 


J,K 




I 


1 123 


1 


10 


1 


INPD 


\ 


K 




1 


J 124 


1 


14 


t 


LSBT 


\ 


J,K 




1 


1 125 


1 


15 


1 


COMX 


1 


J,< 




I 


J 126 


: 


16 


1 


TPG 


1 


J.K 




I 


J 127 


\ 


17 


1 


LPGT 


1 


J,K 




! 


! 133 


1 


OE 


J 


CSRX 


1 


J,K 




! 


1 131 


1 


OF 


1 


CXSR 


1 


J,K 




1 


1 132 

4 


-♦ 


06 


1 


CCMRX 




J,K 




I 

- + 
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+ .-_•. + _—«••+..... . — -.+ -_-_---« --4 

I GOS I I ' IPL ■ I I 

I REF I OP I ASSEMBLER ! OPERAND t 
I NO. I CODE ! HNEUMONIC I FIELO I 
+ _.«-- + 1 — «-f- .......+ 

! 133 I 07 I CXCMR I J,K I 

4- — --- + - — --- + ••--- ••.. + •• •----. 4. 

I li«f I 9F I BCR I J,K,Q ! 

4- *_--_--,».-- __..+._ — ---... + 

I 136 1 Bl I KEY I J»K,Q I 

+ + -«. + .- -_-- f --.-f 

I 143 .1 05 I PB I J,K J 

4-_--_4 _._--.+_. — „.— 4. ^-...-4 

I 139 I B8 I ALG I S,J,K,Q I 

+ -... — 4„ — .•.4.; . 4- 4 

I 1^3 I 6B . I ISQ I J,K,Q I 

4..P 4 -4 4-- -•..-4 

I !<♦*♦ t 13 S COMA I J,< I 

4. -.--4. ---..4 .- — • -4 --«4 

I U5 I IE I MRK I J,K ! 

4.. 4..-,--4 4 .4 

! 1^6 I F0 I DOFINS I J»K0,K1 I 

I I I I QI 

4 4- — 4 : — . — 4 ; — .-.4 

I H7 I Ft ! DOFEX I JU.J1 I 

I I I I K.Q0 I 

4-----4-«-« ..+-.--». -----4. .-_----.. 4 

I 1<«8 I F2 I DOFIX 1 JiKQ I 

II I I KltQl I 

4. -..-4. .--..4 . . 4.-- . — ,4 

I 1<*9 I F3 I OuFUX I J,K0 I 

II I I Kl.Qt I 

4-^««-4-™.-4 — -« ... — 4 ,---.--4 

I 150 I F5 I LPMEM I J,K I 

4---. -4- — ...4... —4 ;.-_4 

I 151 I F6 I LSMEM I J,K . I 

4.. ...4..-. .-4 ._ 4 4 

I 152 I F7 I L'DM.M I J ,K V I 

4. ..4. --4 . --.-4 ••-..4 

I 151 I F* MCC . ■ I J»K I 

4. --..4-. -..-4..-. -_-_f -.-.--4 
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7.0 APPLNDlA E - ASSEMBLY LANGUAGE DESCRIPTION 



I GOS I I IPL I 

I <?EF I OP I ASSEMBLER I OPERAND 

I NO. I CODE I MNEUMONIC I FIELD 



I lib I F9 I DMI 

1 I I 



I 155 S FA 
I I 



I 157 I FC 
I I 



I 153 I FD 
I I 



I UCI 
I 



I 156 I F13 I OAI 

I II 



I DLA 
I 



I DLX 
I 



I J«<0,K1 
I QO.Ql 



I J»K0«K1 
I UQ.Q1 



I J,<0,K1 
I .U0,Q1 



I J3,J1 
I K»Q0 



I J0,J1 
I K,G0 



4-----«- -« 

I 159 1 FE 
1 1 

4-----4-----. 


1 DbX 
1 


1 J,K0 
1 <1»Q1 


1 160 I FF 

4 4 


1 10 


1 J1K1Q 
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8.0 A£££NUXiL-F - CgHPiir&J^TPUT 



If the compilation does not abortt the compiler outputs data 
onto two filest a listing file and optionally, an object file 
(see section entitled, "COMPILING SCURCE MOOULES"). 



B.i-usiiaiL£iL£ 



The listing file contains two text forms of the source input 
file. The first form, the "source form", is an exact copy of the 
source input file concatenated with information provided by the 
compiler. The second form, the "assemoly form", is an IPL 
assemoly language listing of the generated object code for the 
source input file and is produced when the C comment toggle is 
selected. 



Example of Listing Filet 

Given the following source I ines t o compile. 

mooule e*s*exahple; 

VAR 

VI t INTEGER, 

V2 t [STATIC) INTEGER t= Z\ 

PROC CHAIN) ERStfP; 
VAR 

V3 * CSTATIC] INTEGER t= <♦ t 

V<* t INTEGER* 

vs,v6 \ integer; 

IF Mc - 3 ThEN 

V* 1= 6 ELSE 

V5 1= 7 
IFENO? 

V3 t= V2? 
PROCEND FRSUP; 
HUUEmD E*S#EXAMPLE 
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8.0 APPL'NJIX F - COMPILER OUTPUT 

8.1 LISTING FILE 



The "source form" is 



PG 1 


STAT 


AUTO 


PR 


NS 


1 ISWL/IPL VERSION 2.0, LEV 


1 














MODULE ERS#EXAMPLE? 


2 














VAR 


3 


U 


• d 








VI t INTEGER, 


<♦ 


<4 











V2 t [STATIC) INTEGER t= Z\ 


5 


8 





U 





PROC [MAIN) ERStfP; 


o 


A 


6 







VAR 


7 


6 


6 







V3 t [STATIC) INTEGER t= <», 


a 


12 


6 







V<* I INTEGER, 


9 


1? 


' 10 







V5,V6 x INTEGER? 


10 


12 


13 







IF M2 = v3 TrtEN 


it 


12 


18 




1 


V^ 1= 6 ELSE 


12 


12 


18 




1 


V5 1= 7 


13 


12 


18 




1 


IFFNO? 


1** 


12 


18 







V3 1= V2; 


15 


12 


18 







PRCCCNJ ERS«P; 


16 


12 











MOCENO ERS^EXAMPLE 


YY/MM/UO 


hH. MM. 


ss 
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8.0 APPENDIX F - COMPILER OUTPUT 

8.1 LISTING FILE 



and the "assembly form" is 



S.LN OPC SECT/OFFSET —TEXT— IPL OP REF 



10 


LOO 
LDC 
EQU 


11 


FJP 
LDC 
SIR 
UJP 


13 


LUC 
STR 


Ik 
15 


LOO 
STR 
RET 
OEF 



ENT 

UJP 

16 OAF 

DAT 

FIN 



CS OQOOuQ C37200Q** LBYXS 
CS 0000XJ** 80030003 EXQ 
CS 000008 2C23 ICH 

CS 00U0A IE82. MR* 

CS O0QQOC*900200QQ BXHEQ 
CS 000010 8D020Q06 EXQ 
CS 00001** CB120006 SDtXS 
CS 000018*9^000000 BXEQ 
CS 0000QE 0008 
CS UJUOiC 800^0007 EXQ 
CS- OOU32.0 C61'2Q0QE SDYXS 
CS O0U01A 0006 
CS 00002** C372U00** LBYXS 
CS 000028 CQ720008 SBYXS 
CS- 00Q02C u<*00 RET 

CS Q0GQ2E 8F0F0UQ** CP 
CS 000032*90000000 BXHtQ 
CS 000036 81010000 SA 
CS 00U03A 3E100018 C'PAOD 
OS 00003E 9**0QFFE1 BXEC 
ST OOOOU** 00000002 
ST 000008 0000000** 
CS 0uQJ3** 08 
CS 000Q**2 80370000 LA 



2 
59 

36 
1**5 
**1 
59 
k 
37 

59 

<♦ 

2 

117 

55 

**1 

19 

5** 
' 37 CS+000UD0 



EPT CS 00002E R-ERSfP 



CS QQ30**6 2FF0 



JPR 



17 



<*8 



RIF CS OQQO't'* Q BS C 
AIN BS 000000 P A(ST) 



SECTION MAP OF MODULE! ERS#EXAMPLE 



CS Q0UQ**8 CODt SECTION *EAQ EXECUTE 
2 BS 000008 BINDING SECTION REAJ BINDING 

1 ST 00000C WORKING ' SECTION . REAO WRITE 
TRANSFlR NAME* ERS#P 
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8.0 APPtNDIX F - COMPILER OUTPUT 

8.1 LISTING FILE 



With regard to the "source form", the fields concatenated to 
the source inout are described below. The compiler fields 
concatenated with the source input lines are called output 
I ines. 



£I£U2 
PG 
LINE 

STAT 



AUTO 



PR 



NS 



JATM/TlMc 



UEEINUI^ 



Decimal number indicating 
the "source form". 



the page number of 



Decimal number assigned to each source line In 

the inout file. This field appears 

immediately below the PG field in the "source 
form". 



Dec im 

Of f Sii 

The 
sourc 
ei thei 
"stat 
d e c I a 
wi thi 
the 
the I 
ri ght 
line. 



al number 
t from th 
field on 
e input I 
r a var 
ic" or "x 
ration w 
n a modul 
by te off 
est varia 
) appear 



which 
e begi 
ly has 
ine on 
iable 
del" a 
hich 
e dec 
set is 
ble (a 
ing i 



siqnif i 

nninq of 

meoninq 

tne sou 

deel ara 

t tribute 

is imme 

aration 

the I oc 
s scann 
n the 



es a re I a 

the STAT 

i f the a 

rce ouout 

tion whi 

or is a 
diately 

In th 
at ion a I I 
ed fro.u 
associate 



tlve byte 
IC area, 
ssociated 

line is 
ch has a 

variab le 
contained 
is case* 
oca ted to 

left to 
d source 



Decimal number which siqnifies a relative byte 
offset from the beginning of a STACK frame. 
The tielJ has meaning only if the associated 
source input line on the same output line Is a 
variable declaration wnich is immediately 
contained in a oroceaure. In this case* the 
uyte offset. is the location allocated to the 
variable aopearing in the associated source 
I ine. 

Decimal number which indicates the procedure 
no st ing j eve I . 

Jecimal numoer hhich inaicates the structured 
statement nest ing I eve I • 

The Jate/time stamp immediate ly fo I lows the 
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8.0 APPENDIX F - COMPILER OUTPUT 

6.1 LISTING FILE 



last output line of the compilation unit. 
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8.0 AHPKNDIX F - COMPILER OUTPUT 

8.1 LlSflNo FILE 



T^e "assembly form" contains a description of the SES/IPL 
LINKER records which are output by the compiler for the 
co.npi let ion unit . 

For each level zero module within a compilation unit, the 
"assembly form" description includes a "section definition'* 
lescriDtion, a "section summary" description, and "other SES/IPL 
LINKER record" descriptions. 



The "section definition 
header I ine 



description is preceeded by the 
S.l*4 OPC SLCT/OFFSiiT --TEXT— IPL OP REF 



E3Ch line aopearing under this header line in the section 

description is referred to as an entry in the "section 

definition" description. The meaninq of each of the fields in 
the header line 1st 



LlLLil 
S.LN 

CPC 

SECT/OFFSET 



— TEXT — 



JPl 3P 



'EF 



lifFIHIIIfiN 

Same definition as the LINE field 
"source form" of tne listing file. 



In the 



Used for compiler deougging and Is to be 
ignored. 

Defines the SES/IPL LINKER section and offset 

(in hexadecimal bytes from the beginning of 

the section) intc wnich the —TEXT— field is 

placed. The comoiler uses five itneumonic 

names to classify the different sections it 

generates! 

CS - cojo section 

QS - binding section 

ST - static (working storage) section 

LT - I itera'l sect Ion 

HP ■- heaD section 

Hexajecin^l data wnich is Inserted at the 
location specified by the SECT/OFFSET field. 

IPL jsse-nbler mnemonic for the instruction In 
the --TEXT-- field. Tnis field is bl anK if 
tne --TEXT-- f ie Id is not an IPL instruction. 

IPL reference number for the instruction in 
tne --TEXT-- field. This field is blank if 
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8.0 APPENOIX F-- COMPILER OUTPUT 

8.1 LISTING FILE 



the --TEXT- 



fleld Is not an IPL Instruction. 



Other items to note within the 
description are the following! 



"section definition" 



If an asterisk appears betweer the SECT/OFFSET and — TEXT-- 
fieldf the instruction in the —TEXT — field contains a 
forward reference to a "target location" in the code section. 
Another entry* ENTRY N, in the section definition description 
is generated oy the compiler to resolve the forward 
reference. ENTRY N*s SECT/OFFSET field will bet 



CS XXXXXX 



where 



XXXXXX = YYYYYY ♦ 2 

and 
YYYYYY « hexadecimal offset of the "section definition" 
entry which contained the forward reference. 

ENTRY N immediately precedes the entry in "section definition" 
description whose —TEXT-- field contains the IPL instruction 
which is the object of the forward reference. 

- If an entry in the section definition description is for an 
instruction and the text string, 'CS + lll7.ll* (where llllll 
is a hexadecimal numoer) aDpears after the REF fieldi then 
this instruction contains a backward reference to the code 
section ana ZZZZZZ is the offset in the code section to wnich 
the reference is made. 

- One can determine the IPL instructions which are generated for 
a source line in the following manner. The entry with s 
non-blank S. LN field associates a group of "section 
definition" entries which are generated for source llne» 
S.LN. The .jroup of entries include the entry with the 
non-Dlank S.LN field and all entries with blank S.LN fields 
which follow* uo to the next ertry with a non-blank S.LN 
field. All entries in this viroup which are instructicr 
entries (i.e.t ones with a non-blank REF field) are the 
instructions generated tor the source line. 

The "section summary" description oagins with a header line of 

SECTION MAP CF MODULE I modjle identifier 

Hhem mojule Identifier is the i lent if i en that was on the rroJule 
declaration statement. 
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\t\e entries which follow the header line are of the following 
generic form* 



ORul 
OROci 



SECTI0N1 
SECT10N2 



LENG1H1 
LLNGTH2 



SEC UESC1 
SEC UESC2 



ATTRIBUTES1 
ATTRIBUTES2 



ORuN Si.CTI0NN LENGTHN 
TRANSFER NAME I XXX 
FIfLQ 



SEC OESCN 



ATTKIBUTESN 



QLZJJilllQH 



OPO 




SFCTIUN 


LENGTH 


SEC. 


.OESC 



SLS/IPL LINKER section ordinal number 
suction. 



for 



AITKI6UTES 



TkAnSFER NAMc 



Either CS , BS, ST, LT, HP (see SECT/OFFSET 
field definition). 

Hexadecimal byte length of section. 

Either CODE SEC! ION 

JINOING SECTION 
WORKING SECTION 
EXTENSIBLE COMMON SECTION 
WORKING SECTION 

SES'/IP.L LINKER section attribute's. Either 

REAO, WRITt. EXECUTE, BINDING, or a 

combination of these. 

XXX is either blank or is the orocedure 
identifier wnich had the main attribute. 



The "other SES/IPL LINKER record" descriptions are intermixed 
with the "section def init i on"' descr iot 1 onst appear to the right 
of the KEF field on tne output listing, and 3re used for 
deouogini the compiler. 

In general, tnese descriptions describe the following type of 

b£S/IPL LINKER records output by the compiler: 

ent^y point definition (EPT) 
relocati or information ( 9 IF) 
j3 jrpss irsertion(AlN) 
external reference linkage (XRL) 
bit string insertion (BIT) 
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8.0 APPENDIX F - COMPILER OUTPUT 
d.i LISTING FILE 



address offset Insertion (AOI) 



a. 2 ygJEKT £IL£ 



Tne object file Is in a format which can be linked by the 
SES/iPL LINKER VI. (see SES User's Handbook section entitled. 
SES/IPL LINKER). 
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9.0 APPg.ND^X H„ -.COMPILING .SOURCE M ODUL ES 



Tne ISWL/CI V2.0 compiler is executed as a procedure and the 
following command readies the compilation procedurel 

GET,IPLI5WL/UN=ALL 

After tne IPlISwL compilation procedure is obtained* It may be 
executed with the fol lowing control statements 

-IPLISWLC ,I = <source f 1 le> H *0=< I isting file>3 

[,U = <ob]ect f ile>H,PASS=<lt2>H ,FL=<f l>T 

The default oarameter values arei 

I = I 

0=0 

3 = R 

PASS = 2 (complete compilation) 

FL = l^OUOO 

The user can increase the efficiency of his IPLISHL 
compi lat ions oy usinq tne PASS option on the procedure call* The 
IPLISWL corni I »r has two distinct passes and they may be 
optionally executed. If PASS=1« the syntax errors are checked. 
If PASS=2 or the parameter is emitted* the syntax errors are 
checKea nnj thu codi» generation is done and an object deck Is 
jenordte.l. 

If tne compiler aborts during a compilation* the message* 
"CO^iLATiuN .AROartU"* is output to the KRONOS standard output 
file. It you obtain this message while compiling* you should use 
tne »-S* Buq Reporting mechanism descrioed in the SES User 
Hjivii.ooK, It is recommended that you 3ttacn the dayfile of the 
aoorrerj compilation with the PSR. 
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10.0 APP£Ni>TX G - <W££L-££2PKAM EXEttJTIflU 



This section describes ISWL/CI V2.0 runtime support 
procedures* and initiation and termination of an IPL ISWL object 
program. 



10.1 IPJ._im HMHIi 



^JPPQPT PROCEPURES 



There exists ISHL/CI V2.Q runtime support procedures for 
processing NEXT and RESET statements* for processing the standard 
procedure, fSTPINGREP, for processing the standard function, 
SSTkInG, and for processing execution time diagnostics (see 
section entitled "ABNORMAL TERMINATION") . If these runtime 
support procedures are referenced, they must oe linKed with the 
binary file produced by the compiler via the SES/IPL LINKER. The 
table below indicates the indirect files in the ALL catalog which 
contain the runtime procedures* 

F ile Na me File Cont ent s 

IPLRT1 runtime error support 

IPLRI2 0STRINGREP and SSTRING support 

IPLRT3 NcXT, RESET support 



10.2 lHUIMIflH 



This section contains an example of KRONOS and SES Subsystem 
commands necessary to compile an ISWL source orogrgm, link and 
load the object file produced by the compiler, and execute the 
program on the simulator (see the SES User's Handbook for a 
description of the IPL SIMULATOR, SES/IPL LINKER, and the SE3/IPL 
REAL MEMORY LOADER). 
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10.0 AFVENJIX G ■- 03JECT PROGRAM EXECUTION 
10.2 INITIATION 



ISWL/CI Version 2.0 compilation and execution 

Toe user should be familiar with the SES Subsystem, especially 

tne LINK and RMl commands, i and the IPL Simulator. 



D3t 

SRF 
/ge 
/ge 
/-i 
/•J* 

/ut 
■/je 

/qe 
/q.i 
/9e 
. /as 
/-r 
**M 
? I 



ch 

L,2uJ 
t , soui 
t ,iPl 
p I isw 
t ,ut I 
I,1U1 
t , ses 

tiSt'S 
t 1 S*b 

t »run 
c i i 

U'-SviS 

SG15 
OQin 



00. 
rce 
isw 
« (i 
/un 
u, I 
Ins 
I ns 
Ir.s 
s»es 



l/ur=al I 

= source,b=binary ,o=.l lsting,f|si3<»000) 

=al I 

ist ing "use lOxx for listinq Pe\/C files* 

l=yourprl "get user's LNS environment" 

2=yourpr2 

o=youror3 

/un=al I 



? I 
Ixx 



(lns=l) "enter subsystem to execute LINK and RML" 

^ES Vl/.i 75/09/02. 08.00.00. - PLEASE LCGIN 

yOU ."'■'". 

"LINK_CB and LIF have been previously 

declared and saved as part of the LNS 

environment • " 
ink_co .name__seed "checK on prefix for subsequent simulator 

command file" 
x 

if (1) .kfn='hinary' 
• ■ 

"files to be linKed" 



? I ink, lco = l ink_cb, I od=to_rml 

? rml , I DU=to_rm| "use LPD name quoted on LINK command" 

? loqotf "exit suosystem to run simulator" 

♦*M^>o 8*«: CONNECT TIME =00.03.01. 

**cNf, PUNStS 

/nor.iiil "simulator does not accept lower case* 4 

/ jt» t «runsim/un = al I 

/-run sim 

IPL ilMLLATOR VERSION 2.1 

MFMjRY=Gl JC1FFF 
? enter Ixxxent "RML generated command file" 

l.>|Tl- lxxxhnt 
. M £-1J-> i lu'JO 

Hl -..lMLLATO^ VERSION 2.1 
. MEM..WY = l».0C6' . 
LJAj l^</JT 
. l'JA J LXXa/02 
L0A3 LXXXZ0J 
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10.0 APPENDIX G 
10.2 INITIATION 



LPAO LXXXZd^ 






LOAD LXXX205 






ECHO OFF 






00002600 02 EXCH 


J20Q00Q0 


P = FOFO 


P FGFj FQFO FOFO FOFO 


MCR 


FOFO 


BKP 0000 0000 0000 


STATE 


MONITOR 


TRACE LL OUOU 0000 0000 


TRACE UL 


0000 0000 0000 


CR A=3,AV=3000000U5002 






CR S = P,bV = 8UQ00u00<*0^ 






EXIT 







UCR FOFO 



"Simulator commands/Pro gram Execution" 



? end 

END 

SIMULATION COMPLETE. 
/ 



10.3 NORMAL TERMI NATION 



A normal procedure epilog (see object code generated for a 
procena) is generated for procedures with the "main" or "xdcl" 
attributes. Therefore* if tt\a environment was established as it 
Is described in the section entitled "INITIATION", and the 
program executed correctly, an environment specification error 
Hill occur (MCR=0100) and the P address should be the address of 
the "return" instruction of the procedure to which control was 
transferred. Tne IPl Simulator' wi I I then prompt the user for a 
command. 



10. <t MmaAk-J£B*ItIAIIQli 



Through tha use of comment toggles (see section entitled 
"IPLISWL Compiler", in the SES User»s HandoooK) the compiler 
generates coae to checK the following conditions! 



k&HiilliGH 



Assignment subrange error 
Divide by zero 



NCR/CDC PRIVATE 
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Index out of range 

Case index out of range 

II one of the above conditions is detected, the comoiler 
assijned source line numoer at whicn the error occurred is 
entered into * register XI and a ca I I is made to a runtime 
procedure whicn outouts an error message onto the file, IPLOUT, 
and executes a program error instruction. Execution aborts and 
th-j user is thpn orompted for a commanj Dy the I D L Simulator. 

The runtime error messages ore the following! 

i 

ASSIGNMENT SUtiRANG;. ER?LR AT LINE XXXXX 
CAS.. INDEX crfROE AT LINE XXXXX 
INDEX OUT OF RANGE FRROP AT LINF XXXXX 
Dly/iD'- BY ZERO LKKOK AT LINE XXXXX 



The field, XXXXX, is the LINE field on the "source lorn 9 
listing file (sue section entitled, "LISTING FILE"). 



of the 
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11.0 APPrNJjX H - "MAoHm. t^tAKQUT .LXAMPLS 



This appendix contains an ISWL/CI "listing file" of a source 
program which exemo 1 1 f ies the usage of machine breakout. 



NCR/COC PRIVATE 
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PG 1 STAT AUTO PR NS 1 ISWL/IPL VERSION 2.0, LEVEL 

1 .0 0. MODULE ICODECIPL)) MBEXAMP? 

2 "$M80" 

3 TYPE 

4 KEC1 = RECORD 

5 8IT1,8IT2 I #BITC5,2), 

6 BYTE1 : tf3YTEC5,4), 

7 ADRi : flADDRESS, 

8 HUESC I tfDESCRH, 

9 U FDESC 'l .0DESCRF 

io o'ooo recend; 

11 VAR 

12 VREC ! RECi 1= C #M( • 5* ) f #M C 5* ) ,tf «C 1 2 3 4 .5 6 7 8 9 AM, 

13 32 UMC4'),#MC8' ),#M( 4 E # ) 3, 

14 32 [#f1{ < , ),ffHC8 , )i#M(%')tf/HC8 , )i#M( l l 7') 3, 

15 32 [[(H1{ , # )t«( , V),#H( , V)^.1C8 , )»#H( , E , )J,<fH( 4 2 3 ^ 5 # )J3i 

16 32 VBIT I $81 T (31 ,33) , 

17 40 VBYTE I #3YTE<7,4), 

18 47 VAOR * ^ADDRESS, 

19 53 VHDESC 1 //DESCRH, 
'20 60 VFOESC t tfOESCRF; 

21 72 Q 

22 ■• 72 PROC [CODE (I PL)-, MAIN) MBEXAMP? 

23 ' 72 6 1 !PROLOG; 

24 ' 72 6 10 VAR 

25 72 6 1 X4 : E#XREG<4)3 INTEGER, 

26 72 6 1 X3 : CtfXREG(3)3 REAL, 

27 72 6 1 X2 S C#XREG<2>3 CHAR, 

28 72 6 1 Q A4 I C 0AREG C4) 3 //ADDRESS , 

29 72 6 1 A5 X '( *AREG <5.) 1 //ADDRESS, 

3tf 72 6 1 AA t M4R£G<0A(i6>>] //ADDRESS, 

31 72 6 1 AB : C#ARFG(0B(16) ) 3 //ADDRESS, 

42 72 6 10 AC I CffAREG (0C'(16))1 //ADDRESS, 

Z6 72 6 1 AD I C tf^REG(0D(16) ) 1 //ADDRESS, 

34 72 6 10 A8,A9 I £//AREG(8 . .9) 3 //ADDRESS, 

35 72 6 10 VBOOL I BOOLEAN, 

30 72 7 1 I t INTLGER, 

3> 72 11 1 PI1 S ""INTEGER; 

38 72 17 1 

39 72 17 1 VREC.BYTE1 S = #M(*A BCD E A B C D E'>; 

40 72 17 1 PI1 t= v.adr; " ■ . * 

41 72 17 1 VADR * = $// ADORESSt //M C 0* ) ,'#M {• • ) f '#M C3 2 1 0*H? 

42 72 23 1 VHDESC 1= S//DESCRHE #M ( * 8 * ) ,//M ( • 4« ) ,# M (* f ) f fi M (' 2 5 8 # ),«MC2 4 # H; 

43 72 24 1 © VFOLSC := 3//DESCRFI I tf MC • ) , //M ( *C - ) , #M< * * ) , #M < * 250* ) , #M ( -24' > 3 , SM( *4096* ) ) ; 

44 72 32 1 LBLl I VQOOL 1= VREC = VREC?' 

45 72 17 1 G L8L2 I VBOOL 1 = VFDESC /= VFDESC; 

46 72 17 1 I 1 = 0OFBCVREC. A0R1,VREC); 

47 72 17 1 I 1= #0FB<PI1)5 

48 72 17 1 I I- ffOFB(VADR)? 

49 72 17 1 I t= 0OF8I1 (Vf.'LC.ADKl,VREC); 

50 72 17 1 Q I*= #0FBIT(PI1) ; 

51 72 17 1 I := //UFUIT(VADR) ; 

52 72 17 1 © i is #LENG(VRFO? 

53 72 17 1 © I * = *LtNG8IT<VREC); 

54 72 17 1 Pli 1= flAODR(I); 
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PG 2 STftt AUTO PR NS 1 ISWL/IPL VERSION 2.0, LEVEL 



55 


72 


17 


1 





•lockreg; 


56 


72 


17 


1 





LCA0,7 


57 


72 


17 


1 





!LOAD,7 


58 


72 


17 


1 





1 STOKE, 7 


59 


72 


17 


1 


o • 


STORE, 7 


60 


72 


17 


1 


' 


LOAO 


61 


72 


17 


1 





ILOAO 


62 


72 


17 


1 





SCORE 


63 


72 


17 


1 





(STORE 


6<* 


72 


17 


1 





LCAD,#X0 


65 


72 


17 


1 


! 


LOAO, /^X0 


66 


72 


17 


1 





(STORE, tfXO 


67 


72 


17 


1 


o. 


•store, #xa 


68 


72 


17 


1 





LCA0,7 


69 


72 * 


17 


1 


! 


LOAD, #8001 


70 


72 


17 


1 





!STORE,#BOOL 


71 


72 


17 


1 





!LOAD 


72 


72 


17 


1 


Q < 


'LOAD 


73 


72 


17 


1 


■ 


STORE 


7V 


72 


17 


1 


0. 


'STORE 


75 


72 


17 


1 





•LOAD, //MULT 


76 


72 


" 17 


1 





•STORE, #MULT 


77 


72 


17 


1 





AOD 


78 


72 


17 


1 





•SUB 


79 


72 


17 


1 





IM'JLT 


80 


72 


17 


1 





'DIV 


31 


72 


.17 


1 


Q { 


AGS 


82 


72 


17 


1 


! 


ADO,tfH 


83 


72 


.17 


1 





!AOD,#H- 


8V 


72 


17 


1 





!ADD,J>H 


85 


72 


17 


1 


' 


SUB, /AH 


86 


72 


If 


1 


' 


SUB,#H 


8/ 


72 


17 


1 





•MULT,#H 


88 


72 


17 


1 





»MULT,#H 


89 


72 


17 


1 





'OIV ,#H 


90 


. 72 


17 


1 


2 


COMP 


91 


72 


17 


1 





•COMP,tfH 


9<- 


72 


17 


1 


o • 


!9R£Q 


*3 


72 


17 


1 





•BRNE 


9^ 


72 


17 


1 





B RG T 


95 


72 


17 


1 





!BRGE 


96 


72 


17 


1 





!BREQ f #H 


9/ 


72 


- '17 


1 





5 3SNE, tfH 


9ft 


72 


17 


1 





iiRGT,#H 


99 


72 


17 


1 





!RRGE,*H 


LLu 


72 


17 


1 





•QCLOOP 


lul 


72 


17 


1 





•BR 


102 


72 


17 


1 





!BR 


103 


72 


17 


1 


! 


OR 


10** 


72 


17 


1 





!COPY 


105 


72 


17 


1 





•COPY 


1U6 


72 


17 


1 





ICOPY 


107 


72 


17 


1 


' 


•COPY 


108 


72 


17 


1 





!COPY,0H 


109 


.7* 


17 


1 





IAOCA 



X4 



x^ 

Xk 
Xk 
Xk 

x<* 

Xh 
X<* 
X3 
X3 
X3 
X3 
X3 
X3 
X3 
AC 
AC 
AC 
AC 



tAC 



[AC 
CAC 
CAC 
CA.C 
CAC 
CAC 
CAC 
CAC 
CAC 
CAC 
CAC 
UP 
CAC 
CAC 
CAD 
CAD 
CAO 
CAD 
CAC, 5] 
CAC, 53 

x*+,x3; 

X**,X3? 

x**,x3; 
x*i,X3; 
x*f,x3; 

X<*,X3? 
X^ f CX3 

x<*,5; 

X**,X3? 
X**,5! 

x^,x3; 

X<*, CX3 

x^,X3; 
x** f X3; 
x^,x3; 

Xi* t X3 , 
X**,X3, 
X*f,X3, 
X^,X3, 
X** ,X3, 
X<*, X3, 
X^,X3, 
X*,X3, 
X^,X3, 
AC,AO, 
UP,X*» 

ac,x<*; 
x<*,x3; 

x<*,ac; 
ac»ad; 

AC f X^? 

x^,X3; 

AC • CAO 



,X3,10 
,<+0963 
,X3,10 
,V0'9o3 
,X3,1Q 
t^ 096-3 
,X3,13 
,tf 096 3 
,X2,1Q 
,**09a3 
,X3,10 
,<+0963 
,^0963 
,*+0963 
,^0963 
,X^,10 
,^0963 
,X3,10 
,<*0963 



2m\ 
2^3; 

• 

2^3; 
2^3; 

2<*3; 

« 

2^3? 

2^3; 



,^0963 ; 



,<fQ963; 



**096; 

//OFP(LBLl) ; 

«fr09 65 

#0FP(LBL2,LBL1>; 

^096? 

<*096; 

^096? 

^♦096; 

**Q96; 

^096? 

3; 



♦^0963; 
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PG 3 STAT AUTO PR NS 1 ISWL/IPL VERSION 2. t LEVEL 0. 



110 


72 


17 


1 





ADOA,/>P 


' AC,CX2 t tfOFP(L8Lin; 


111 


72 


17 


1 





•ADDA 


■• AC»X3; 


112 


72 


17 


1 





'ENTER, tfPOS 


X^,15? 


113 


72 


17 


1 





.ENTER, #NEG 


X<m15? 


11V 


72 


17 


1 


J 


ENTER, tfEXTD 


X^,'4096; 


ll 1 ? 


72 


17 


.1 


• 


!FNTER,tfXO 


78; 


116 


72 


17 


1 





!ENTER,#SIGN 


■x*»,i5.; 


117 


72 


17 


1 





IROTATE 


X«*,X3, CX2,10 3 ; 


118 


72 


17 


1 


. 


SHIFT 


X^,X3 f CX2,10 i; 


119 


72 


17 


1 





ISHIFT ,#H 


X<*, X3,CX2,103; 


120 


72 


17 


1 





[OK 


X^,X3; 


121 


72 


17 


1 





!XOR 


X4,X3; 


122 


72 


17 


1 





ANJ 


x«f,x3; 


123 


72 ' 


17 


1 





!NOT 


X^,X3? 


12<* 


72 


17 


1 





. INHIB 


x**,x3; 


125 


72 


17 


1 





IMASK 


Xk, (X3,10 3; 


126 


72 


17 


1 





■ISOLATE 


X^,X3, CX2,103 ; 


127 


72 


17 


1 


! 


INSERT 


X«f f X3,CX2,10]; 


123 


72 


17 


1 





!MOVE 


AAf ab; 


129 


72 


17 


1 





•ADO 


lA**tA8 f 100], CA5, A9,10G3 


1*3 


72 


• 17 


1 





. SUB 


CA*»,A8- f 1001t CA5, A9,1003 


131 


72 


17 


1 





MULT 


CA^,A8 f l^Q03, [A5,A9,1003 


132 


72 


17 


1 





!DIV 


tA«f»A8tlOOJ, CA5, A9tld-01 


133 


72 


17 


1 





•SCALE 


tA<*,A8,1003, CA5. t A9,1003 


13<* 


72 


17 


1 


< 


SCALEPOUND 


£A<f,A8 f 1003, t A5, A9,1Q03 


135 


72 


17 


1 





COMP,//UEC 


[A^,A8, 10.0 3 f U5*A9, 1003 


13o 


72 


17 


1 





!COMP 


XA^fAS-tiOOlf CA5,A9,1Q03 


137 


72 


17 


1 





•CO*P, tfCQLL 


" £A*»»A8*1Q0J, U5,A9,i003 


138 


72 


17 


1 





•SCAN 


CA^, AS, 1003, I A5 t A9,1003 


139 


72 


17 


1 


! 


TRANSLATE 


[A*f,A8, 1003, CA5,A9, 1003 


UO 


71 


17 


1 





!MGVE 


CA^,A8,1003, CA5, A9,1003 


1<*1 


72 


17 


1 





•EDIT 


CA^,A8 tiOOlf [ A5,A9,1003 


1^2 


72 


17 


1 





•MOVE, #NUM 


£A<mA8,1Q0), CA5, A9,10 3 


IkZ 


72 


17 


1 





1 MCVE , tf FORMAT ,#FORMAT 


CA«f f A8tl003 f CA5,A9,1Q03 


1<^ 


72 


17 


1 





!AOOt#Ff#F 


[A<*,A8,10 03,CA5,A9,10G3 


1^5 


72 


17 


1 





ICALCSUB 


CA^t Att,.1001 f CA5f A9tl001 


i<*6 


72 


17 


1 





8CONV, #R 


X<*,X3? 


H*7 


72 


17 


1 


< 


»CCNV 


x^,X3; 


i<*8 


72 


17 


1 


< 


>ACTO,tfR -- 


X4,X3; 


1<*9 


72 


17 


1 





!SU, c 3,tfR 


x<*,X3; 


150 


72 


17 


1 





»AOD,tfR,#UN 


x^ f x3; 


151 


72 


17 


1 





(SJB,//R,tfUN 


x<*,X3; 


152 


7 2 


17 


1 


! 


MULT,#R 


xtf,x3; 


153 


72 


17 


1 





•OIV,«R 


x^ f x3; 


15^ 


72 


17 


1 





»AQG,tfOR 


x<*,X3; 


155 


72 


17 


1 





!SU r J,#UR 


x^,x3; 


156 


72 


17 


1 





•MULT,#OR 


x^,x3; 


157 


72 


17 


1 





!UIVf#OK. 


x**.X3: 


158 


72 


17 


1 





IBREQ, VR ' 


X^ t X3,^096; 


1*9 


72 


17 


1 





!ORNE,^R 


X«*,X3,if096; 


160 


72 


17 


1 





!QRGT,#R 


X^»X3, ^096; 


161 


72 


17 


1 





!BRGE, UR 


XU,X3 f ^096; 


lt>2 


72 


17 


1 





IBR.0UNOFLO 


X3,4096; 


lt>3 


72 


17 


1 





ICOMPttfK- 


x**,X3; 


lb** 


72 


17 


1 





ICALL 


(AA V 15)«A8»AC; 
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PG <. STAT AUTO PR NS 1 ISWL/IPL VERSION 2.0, LEVEL 



165 


72 


17 


1 





JCALL 


UPt40963tAB f AC 


16b 


72 


17 


1 





!R£TURN; 




167 


72 


17 


1 





•pop; 




168 


72 


17 


1 





ilxchange; 




169 


72 


17 


1 





SERPOk? 




170 


72 


17 


1 


0* 


IINTRPT 


X3; 


171 


72 


17 


1 





! INTRPTPROD 


X3; 


172 


72 


17 


1 





!LQ4d,#SET 


X4,aa; 


173 


72 


17 


1 





!CCMP 


X4,aa; 


174 


72 


17 


1 





!Comp, //page; 




175 


72 


17 


1 





!ICA0,//PAGE 


X4,X3; 


1/6 


72 


17 


1 





!LOAD, //STATE 


X4,X3; 


177 


72 


17 


1 





ISTORE, //STATE" 


X4,X3; 


178 


72 


17 


1 





'.SLOAU, y/MAlNT 


X4 ,X3; 


179 


72' 


17 


1 





. !STORE.f 0MAINT 


X4,X3; 


180 


72 


17 


1 





! BRW/COND 


61,4096; 


181 
182 


72 
72 


17 
17 


1 

1 







!K£YP01NT 
! PURGE 


X3,2,4; 
X4 f 3? 


184 


72 


17 


1 





JALGORITHM, 7 


A8 f A9,16? 


184 


72 


17 


1 





! AD0»»IMM 


X4, 1X3,40963; 


185 


72 


17 


1 





S'COMp- 


AAtAB; 


186 


72 


• 17 


1 





fCOWV.f #EQ 


X4 • 


187 


72 


17 


1 





ISTORtf #.<IND 


CA4,A8,£003,X4?. 


188 


72 


17 


1 





!LCAD,#OFFSET 


X4, CA4 f A8,100i; 


189 


72 


17 


1 





!ADU,#INDEX 


CA4,A8,1QQ3,X4; 


190 


72 


17 


1 





!SUB t #INOEX 


CA4,A8,1003 ,X4; 


191 


72 


17 


1 





•AND 


AC,A8» 


192 


72 


17 


1 





•OR 


' AC,A8; 


193 


72 


17 


1 





!XOR 


AC ,A8; 


194 
195 


72 
72 


17 
17 


1 

1 






!MCC 

.•COPY, 0ALPHA 


AC,A8; 
CA4,A8,1G03,69; 


19o 


72 


1*7 


1 





!CQMP,*ALPHAFILL 


CA4,A8,1003, 68; 


197 


72 


17 


1 





! ABDftf BIN 


CA4,A8, 1001,67; 


198 


72 


17 


1 





!LOAO 


AD, CA4,A8,1GQ3 ; 


199 


72 


17 


1 





!LOAO 


X4,£A4,A8,1Q03; 


200 


72 


17 


1 





•STORE 


X4,CA4,A8,i00 3; 


2ul 
202 


72 
72 


17 
17 


1 
1 



' 


!IO 
'END TESTING MACHINE CODE" 


A8,l,2; 


203 


72 


17 


1 





jepilog; 




204 


72 


17 


1 


PRQCcNO H3EXAMP; 




20 5 


72 








MODEND M8EXAMP 




75/08/29, 


> 09. 


52.04 
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S # LN OPC SECT/OFFSET —TEXT— I^L OP REF 



20^ OEF EPT CS 000 32A R MBEXAMP 

205 FIN . AIN OS 000000 P A (ST > 

AIM BS 000008 P ACLT) 



SECTION MAP OF MOOULE: MBEXAMP 

il CS 0003^8 COOE SECTION 
3 GS 000010 BINDING SECTION 
2 LT 000017 WOKKING SECTION 
1 ST 0000^8 WORKING SECTION 
TRANSFER NAME! MBEXAMP 



REAQ 


EXECUTE 


REAO 


BINDING 


REAO 




REAO 


WRITE 



NCR/CDC PRIVATE 
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LINE 

1 
23 
39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
51 
52 
53 
54 
55 
5 b 
'57 
58 
5.9 
\ 60 
61 
62 
63 
64 
65 
66 
67 
63 
69 
70 
■71 
72 
73 
74 
75 
76 
77 
78 
7* 
60 
81 
8 2 
83 
84 
85 
86 
67 
88 
69 
90 
91 



OFFSrT LINE 



OFFSET LINE 



OFFSET LINE 



OFFSET 



CS*d000UQ 

'cstuuuoqu. 
as ♦ o o u o u a 

CS+U0U01A 
CS+GQQ026 
CS + U0U06-8 
CS + QOOOAA 
CS+G000EC 
CSf OUOluA 

cs+oooi22 

C3+0QJ 128 

CS*0Q01?E 

CS+0Q013*» 

CS+OOu 13C 

CS+0U0144 

CS*0U0.1^C 

CS+0J0154 

CS+GiiGlvC 

CS+000166 

CS+QuO lu6- 

C3+GQ0 16A 

CS+UQ016E 

CS+00G1/2 

CS + QO.0.176 

CS+Q001/A 

Co+0G0 17E 

CS*000182 

CS+0U01J6 

CS+0UG13A 

CS*0QQ18E 

CS*000192 

CS+0o0196 

CS*00019A 

CS+OQ'J IjE 

CS+CQO 1A2 

CS+UOO 1A6 

CS+0001AA 

CS+0GG1AE 

CS+00Q1L2 

CS+0G0184 

CS+GuO irt6 

CS* 00 0138 

CSf OOOl^A 

OS+UOG tKC 

CS*UOQl!i£ 

CS+UOOICO 

CS+OOU 1C2 

CSf 0001C6 

CS*0U01C8 

CS+OOQlwA 

CS+GG0 1CC 

CS + U001CE 

CS+QUQiu2 

CSf QUG1U4 

CS<-00fflO6- 



92 CS*0001U8 

93 CSfrOOOluC 

94 CS+UCOIEO 

95 CS+Q0.01E4 

96 CS+0001E8 
97 "CSfOOOlfcC 

98 CSfGOOlFO 

99 CS+QQ01F4 
100 CS+QUQ1F8 
lUl-'Ci*0001F C 

102 C5+0O02Q0 

103 CS+0Q02U2 

104 CS4-000204 

105 GS+000206 

106 CS+000208 

107 CS+00020A 

10 8 CS + U0020C 

109 CS+Q0G20E 
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